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PREFACE 



This manual describes the UNICHANNEL-15 (UC15) Software System and its 
primary component PIREX, the peripheral processor executive. 

No attempt is made in this document to describe the various UC15 hard- 
ware instructions; those are explained in the UNICHANNEL-15 System 
Maintenance Manual (DEC-15-HUCMA-B-D) . However, examples of instruc- 
tion sequences will be used when necessary to clarify programming con- 
ventions or illustrate important aspects of the UNICHANNEL Software 
System. 

It is recommended that the reader have a thorough understanding of the 
UC15 hardware components before attempting to proceed with this manual, 
The user who plans to use the UC15 Software System in conjunction with 
some operating system on the PDP-15, and not modify it, should gain a 
thorough understanding of Chapter 1 of this manual. Users who wish to 
modify the UNICHANNEL-15 Software System should read the UNICHANNEL-15 
System Maintenance Manual (DEC-15-HUCMA-B-D) . In addition, a know- 
ledge of PDP-11 and its assembly language is necessary before attempt- 
ing UC15 system modification. ^ 

A Glossary is included following the appendices, and should be used to 
clarify terms not familiar to the reader. Program flow charts are 
also included in this manual to aid the user in understanding the 
logic flow. 

The following documents also pertain to the UC15 System: 

MACll Assembler Programmer's Reference Manual DEC-15-LMCMA-A-D 

DOS User's Manual DEC-15-0DUMA-B-D 

DOS System Manual DEC-15-0DFFA-B-D 

UNICHANNEL-15 System Maintenance Manual DEC-15-HUCMA-B-D 

Instruction List for the PDP-15 

PDP-15/76 Systems Reference Manual DEC-15-XSRMA-A-D 

DOS- 15 V3Bj2fJg0 Update Document DEC-15-OD3BA-A-D 
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CHAPTER 1 
INTRODUCTION 

1.1 UNICHANNEL-15 SOFTWARE COMPONENTS 

The UNICHANNEL-15 Software System consists of the following four 
components : 

1. PIREX 

2. SPOLll 

3. MACll 

4. ABSLll 

1.1.1 PIREX 

PIREX (peripheral executive) , a component of the UNICHANNEL-15 (UC15) 
Software System, is described in Chapters 3 and 4 of this manual. 
PIREX is a multiprogramming peripheral processor executive executed by 
the PDP-11. It is designed to accept any number of requests from pro- 
grams on the PDP-15 or PDP-11 and process them on a priority basis 
while processing other tasks concurrently (e.g., spooling other I/O 
requests) . PIREX services all input/output requests from the PDP-15 
in parallel on a controlled priority basis. Requests to busy routines 
(tasks) are automatically entered (queued) onto a waiting list and 
processed whenever the task in reference is free. In a background 
environment, PIREX is also capable of supporting up to four priority- 
driven software tasks initiated by the PDP-15 or the PDP-11. 

1.1.2 SPOLll 

Spooling is a method by which data to and from slow peripherals is 
buffered on a high performance RK05 disk. Spooling allows the PDP-15 
to access and output data at high speed, freeing more of its time to 
do computation. Programs that do a great deal of I/O, especially 
printing and plotting, are not required to be core resident to complete 
the entire job. This frees the computer to quickly advance to more 
jobs, dramatically increasing the throughput of the entire system. 



1-1 J-5 



DOS-15 V3B0i2f0 Update Document 
The SPOLll task permits simultaneous spooling of line printer and 
plotter output, and card reader input. The capacity of the spooler is 
user-defined with a possible maximum of over 1,000,000 characters 



allowed. 



1.1.3 MACll 



MACll is a special version of the standard MACRO-11 assembler available 
on the traditional PDP-11 computer system. This program is executed 
as a task under the PIREX Executive. It is used to conditionally- 
assemble various components of the UNICHANNEL Software System. Since 
this assembler is a subset of MACRO-11, programs assembled under 
MACRO-11, will not necessarily assemble under MACll. In addition, 
programs written and assembled under MACll will not necessarily operate 
correctly on other PDP-11 systems. MACll produces assembly listings 
and absolute binary paper tapes as outputs. Detailed information con- 
cerning MACll can be found in the MACll Assembler Programmers Reference 
Manual. 



1.1.4 ABSLll 

ABSLll is a PDP-15 Hardware Read In Mode paper tape program used 
to bootstrap-load the UNICHANNEL peripheral processor with absolute 
binary paper tapes. While primarily designed to load the PIREX exec- 
utive into the PDP-11 memory, ABSLll may be used to load any absolute 
program into the PDP-11 and optionally start it. Additional informa- 
tion on ABSLll may be found in Chapter 2 of this manual. 



1.1.5 System Software Modification 

The complete UC15 Software System may be modified or expanded by the 
user when running under the DOS-15, BOSS-15, or RSX-PLUS III program- 
ming systems. A common editor, called EDIT, allows source changes to 
the PDP-15 or PDP-11 software. MACRO-15, the PDP-15 MACRO Assembler, 
and MACll, a PDP-11 MACRO Assembler allow new object code to be gen- 
erated. Both the MACRO-15 and MACll assemblers are powerful MACRO 
assemblers that facilitate easy code generation and source readability, 



1.2 UNICHANNEL-15 HARDWARE SYSTEM 

The UC15 hardware (see Figure 1-1) consists of a PDP-11 minicomputer 
used as an intelligent peripheral controller for the larger PDP-15 
main computer. The PDP-15 functions as the master processor by initi- 
ating and defining tasks while the PDP-11 peripheral processor func- 
tions as a slave in carrying out these tasks. In order to effectively 
operate, with a minimum of interference with the master processor, the 
peripheral processor uses its own local memory of between 4,096 and 
12,288 16-bit words. Since peripheral control requires only a frac- 
tion of the peripheral processor resources, the remainder of the 
processor's resources can be used for parallel processing of back- 
ground tasks. 
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Figure 1-1 
UNICHANNEL-15 Hardware System 



1.2.1 Common Memory 

Common memory is that memory directly accessable to both the master 
processor - the PDP-15, and the peripheral processor - the PDP-11. Thus 
common memory occupies the upper portion of the PDP-11 address space 
and at the same time the lower portion of the PDP-15 address space. 
The UC15 System allows any Non-Processor Request device on the UNIBUS 
to access PDP-15 memory so that data can be transferred between I/O 
devices and common memory. 

The use of common memory allows ease of data transfer between PDP-15 
memory and secondary storage (disk, magnetic tape, etc.). The PDP-11 
peripheral processor can access a maximum of 28K of memory. Table 1-1 
shows the amount of Common memory accessible to a PDP-11 processor 
with a given amount of Local memory. 



Table 


1-1 


Common Memory Sizes 


PDP-11 LOCAL 


COMMON MEMORY 


MEMORY SIZE 


SIZE 


4K- 


24K 


8K 


20K 


12K 


16K 



NOT supported under DOS-15 V3B00j2(. 

1-3 
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The UNIBUS can address the combined PDP-15/PDP-11 memory, which can 
extend to a maximum of 124K. For instance, the RK05 and its disk con- 
troller can transfer information to or from a location outside of the 
common memory region. Figure 1-2 outlines a typical memory map of the 
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Figure 1-2 
Memory Map of a UNICHANNEL System 



PDP-15 and PDP-11, illustrating the common shared memory address space 
and the PDP-11 local memory. 



1.2.2 Interrupt Link 

The PDP-15 and the peripheral processor communicate with each other 
through device interfaces. When the PDP-15 initiates a new task, it 
interrupts the peripheral processor with a message. The message is 
designated as a Task Control Block Pointer (TCBP) and points to a 
table (Task Control Block) in common memory where the task is defined. 
The peripheral processor performs the task and can signify its comple- 
tion by sending an optional interrupt back to the PDP-15, 
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1.2.3 Peripheral Processor Hardware 

The UC15 System in its standard configuration consists of the follow- 
ing equipment (Figure 1-3) : 
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Figure 1-3 
UNICHANNEL System 
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PDP-11 Peripheral Processor 

DR15-C Device Interface 

Two DRll-C Device Interfaces 

MX15-B Memory Bus Multiplexer 

8096 Words of 16-Bit Local Memory 

The PDP-11, which functions as the peripheral processor, can itself 
only process 16-bit words but controls peripherals that can process 
18-bit words to provide compatibility with the PDP-15. The DR15-C 
and the two DRll-C Device Interfaces provide the communication facil- 
ity between the PDP-15 and the PDP-11. The PDP-15 can interrupt the 
PDP-11 and send a data word (TCBP) to the PDP-11; this interrupts the 
PDP-11 at priority level 7 (the highest priority level) and causes a 
trap thru location 3108. ^he PDP-11, serving as a peripheral proces- 
sor, can interrupt the PDP-15 to indicate an error condition or job 
completion at any one of 128 API vector locations at any one of four 
API priorities.! 



(1) This applies to systems with the API option - systems without API 
can use four skip instructions, corresponding to the four hardware 
priority levels, to determine the nature of the interrupt. 
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The MX15-B Memory Bus Multiplexer functions as a memory bus switch to 
allow either the PDP-15 or the PDP-11 to communicate with the common 
memory. The MX15-B also provides the PDP-11 with the capability of 
performing byte instructions which reference PDP-15 memory. 
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CHAPTER 2 
LOADING AND EXECUTION 



2 . 1 INTRODUCTION 



This chapter explains how to get the DEC-supplied UNICHANNEL-15 Soft- 
ware System up and running, how to tailor the system to a specific 
configuration, and how to maintain the system at a high level of per- 
formance. In addition, a list of the UC15 software components used in 
the various PDP-15 monitor systems is included. 



2.2 LOADING THE SYSTEM-"- ' ^ 

The UC15 system is activated by using ABSLll to load the PIREX execu- 
tive into the PDP-11 UNICHANNEL local memory. DOS-15 is then boot- 
strapped from the RK05 cartridge and the system is ready to: 

1. Continue running under DOS-15 

2. Begin execution of BOSS-15 

3. Begin execution of RSX-PLUS III 



2.2.1 ABSLll 

ABSLll is a PDP-15 absolute binary paper tape program which is read 
into the PDP-15 at location 177008 via the Hardware Read In mode (HRM) 
on the PDP-15. It is used to load PDP-11 absolute binary paper tape 
on to the PDP-11. This self starting program is written in MACRO-15 
and octal. (The PDP-11 code is written in octal and assembled with 
MACRO-15.) When ABSLll is first loaded, PDP-15 halts and waits for 
the user to start the PDP-11. The starting address for a PDP-11 de- 
pends upon the size of its local memory. Table 2-1 lists the avail- 
able options. 



(1) Refer to the DOS SGEN Manual for the details of how to use DOSSAV | 
to initially place a DOS System on the RK05 and prepare it for use. 

(2) If the RK Disk is not going to be the system disk (e.g., the RP 
or RF disks would be the system disk) , see Appendix D for details of 
the proper installation procedure. 
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Table 2-1 
ABSLll Starting Addresses 



Local Memory Size 



4000 words 

8000 words 

12000 words 



ABSLll Starting Address^ 



eoooog 

lOOOOOg 

120000g 



When the PDP-11 is running, the user can place a PDP-11 absolute tape 
(in this case PIREX) in the PDP-15 High Speed Reader and depress the 
CONTINUE switch on the PDP-15. This reads the tape into the lower 
SK-L of the PDP-15 in identical relative positions as if it were loaded 
into the PDP-11 's own local memory. When the tape is completely 
loaded, the PDP-15 signals the PDP-11 to relocate the program into the 
PDP-11 's local memory and optionally start it, if a transfer address 
was specified on the tape (as on the PIREX tape). If not, the PDP-11 
halts and waits for a manual start by the user. The PDP-15 halts once 
the tape has been loaded. The relocation of PDP-11 absolute programs 
into memory is done by copying the entire lower 8k1 of the PDP-15 into 
the lower 8K addressing space of the PDP-11 (or the entire 4K, or, the 
entire 12K depending on local memory size) on a word by word transfer. 
This relocation, therefore, results in the entire PDP-11 memory being 
altered with all previous information overlaid. 

If the first paper tape does not have a start address, additional tapes 
can be loaded by depressing the PDP-11 CONTINUE switch once and depress- 
ing the PDP-15 CONTINUE switch twice. Warning - the maximum PDP-11 
program address that can be loaded by ABSLll is the amount of PDP-11 
local memory, which is a maximum of 12K for UNICHANNEL systems. 

Checksum errors are detected by the PDP-15 and result in a halt with 
all I's in the AC register. The checksum error may be ignored by 
depressing the CONTINUE switch on the PDP-15. 



2.2.2 Loading ABSLll, PIREX, and DOS-15 

The following is a step-by-step description of how ABSLll, PIREX, and 
DOS-15 are loaded. 

1. Place the ABSLll paper tape into the PDP-15 Paper Tape Reader. 
The Paper Tape Reader ON/OFF switch must be in the ON position 

2. Verify that the RK05 Disk Cartridge is loaded into drive and: 

a. The LOAD/RUN switch is in the RUN position. 

b. The write ENABLE /PROTECT switch is in the ENABLE 
position. 



(1) This value depends upon the actual local memory size - 4K, 8K 
or 12K. 

I (2) This is the PDP-11 console address. 
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3. Press the HALT switch on the PDP-11 UNICHANNEL console. 

4. On the PDP-15 console, set the address register switches to 
177j2fjZf (octal) , then press STOP and RESET simultaneously. 

5. On the PDP-15 console, press READ IN. The ABSLll paper tape 
should read in. 

6. When the Paper Tape Reader stops, observe the PDP-15 accumu- 
lator (AC) using the proper setting of the rotary register 
selector and register select switch on the PDP-15 console. 

a. If the AC is 0, proceed to step 7. 

b. If the AC is not 0, retry starting at step 1. (If this 
fails consistently, you have either a bad ABSLll paper 
tape or a hardware problem.) 

7. On the PDP-11 UNICHANNEL console, load the starting address 
for the PDP-11 portion of ABSLll into the switch registers: 

a. For a 4K local memory UNICHANNEL use 60000g 

b. For an 8K local memory UNICHANNEL use lOOOOOg 

c. For a 12K local memory UNICHANNEL use 120000o 

o 

Then press the PDP-11 LOAD-ADR switch 

8. On the PDP-11 UNICHANNEL console, raise the HALT/ENABLE 
switch to the ENABLE position and then press the START 
switch. The PDP-11 RUN light should now be lit. 

9 . Remove the ABSLll paper tape from the reader and place the 
PIREX paper tape into it. 

10. On the PDP-15 console, press the CONTINUE switch. PIREX 
paper tape should read in. 

11. Remove the PIREX paper tape and verify that the bit and RUN 
lights on the PDP-11 UNICHANNEL console are lit. This is an 
indication that PIREX is running. 

12. Load RK Bootstrap tape (hardware read in mode tape) into the 
Paper Tape Reader. 

13. Set Address Switches on the PDP-15 Console to 

a. 77637g for a 32K or more PDP-15 

b. 57637g for a 24K or 28K PDP-15 . 

c. 37637g for a 16K or 20K PDP-15 

14. On the PDP-15 Console, press simultaneously STOP and RESET. 

15. On the PDP-15 Console, press the READ IN switch. The RK 
Bootstrap tape should read in. 

16. DOS-15 should announce itself. If not, check that the console 
terminal is powered up, is ONLINE and not out of paper. 

Also check that the correct disk cartridge was loaded into 
drive . 
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2.3 UNICHANNEL SOFTWARE RECONFIGURATION 

The initial UC15 system supplied to the user may require modification 
to be effectively used. This system is configured as follows: 

1. An 8K local memory MACll assembler 

2. A PIREX Executive with RK and LP drivers 

3. A SPOLll spooler for LP only 

2.3.1 MACll 

If your system does not have 8K local memory on the UNICHANNEL, you 
"^^st first tailor the MACll assembler into a version compatible with 
your local memory size. The procedure to perform this under DOS-15 
follows : 

1. Assemble MACIMG XXX present under the PER UIC using 
MACRO-15 and one of the following assembly parameters. 

a. LM4K = For a 4K local memory UNICHANNEL 

b. No parameter For an 8K local memory UNICHANNEL 

c. LM12K = For a 12K local memory UNICHANNEL 
This will produce the binary file MACIMG BIN 

2. Load one of the following MACll paper tapes into the Paper 
Tape Reader: 

a. DEC-15-ODUFA-A-PB For a 4K local memory UNICHANNEL 

b. DEC-15-ODUEA-A-PB For an 8K local memory UNICHANNEL 

c. DEC-15-ODUTA-A-PB For a 12K local memory UNICHANNEL 

3. Issue the DOS-15 API OFF command (if you have API) , 

4. Issue the DOS-15 $ GLOAD ^ command, then type > —MACIMG (auf) 

5. The paper tape should read in. When it stops a "DONE" 
message should be printed on the console terminal; at this 
point, the PDP-11 part of MACll is installed on disk. 

6. Assemble the MACINT XXX under the PER UIC using the following 
assembly parameters: 

a. LM4K = For a 4K local memory UNICHANNEL 

b. No parameter For an 8K local memory UNICHANNEL 

c. LM12K => For a 12K local memory UNICHANNEL 

7. LOGIN under the MICLOG and assign DAT. -10 to the PER UIC. 

$A RK <PER> -10^ 
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8. Using PATCH do the following: 

$PATCH > 



> MAC11 } 

> READ MACINT \ 

>EXIT 1 



This installs the PDP-15 portion of MACll onto the disk. 
9. A new MACll will now be available for use. 



2.3.2 PIREX 

The PIREX Executive should be configured to contain device drivers 
for only those peripherals actually present in the user's configura- 
tion. The DOS Assembly Parameters Document DEC-15-0DAPA-A-D describes 
the various assembly options available to the customer. The following 
procedure should be followed to produce a tailored version of PIREX. 

1. Under the PER UIC, use EDIT to add or remove the various 
assembly parameters for PIREX. (Parameters for programs 
assembled by MACll must be included in the main source file.) 

2. Assign DAT-12 to the listing device. (The absolute binary 
output device will always be paper tape.) 

3. Run MACll and assemble PIREX XXX-*": 

$ MAC11 } 
>BL-*- PIREX XXX (alt) 



Where : 

"B" causes the absolute binary paper tape to be punched 

"L" causes the optional listing to be printed on DAT-12. 

4. Load the new paper tape using the instructions in Section 
2.2.2 of this chapter. 



2.3.3 SPOLll^ 

The UNICHANNEL Spooler should be configured to provide spooling only 
for those devices present on the user's configuration. The spooler 
supplied with the system is configured to provide Line Printer spooling. 
If the user does not possess a UNICHANNEL Line Printer (LPll/LSll/ 
LVll) , or the user wishes to spool other UNICHANNEL devices, this 
spooler should not be used. The procedure for producing a spooler 
tailored to the user's configuration follows. 



(1) XXX represents the latest version nxamber, i.e., PIREX 118. 

(2) This procedure applies only to DOS-15 V3A0J2(j2f. See the DOS-15 
V3B000 Update Document DEC-15-OD3BA-A-D for details of how to 
install the spooler on a DOS-15 V3BJZf00 system. 
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1. Under the PER UIC use EDIT to add or delete the following 
assembly parameters in SPOLll XXX: 

a. $LP = 40000 for Line Printer Spooling 

b. $CD = 20000 for Card Reader Spooling 

c. $PL = 10 000 for Plotter Spooling 

2. Assign DAT-12 to the listing device. 

3. Assemble SPOLll under MACll with both the B and L switches 

$ MAC11 ^ 
> BL --—SPOLll XXX lAL'] 



4. From the listing locate the definition of SPOLSZ and copy 
down the value . 

5. Run PIP and type: 

$ pip) 

> L TT-^ RK (L )^ 

This will produce a symbolic listing. Using this listing, 
locate the column headed FB (first block) and find the first 
block of SPOOL. 

6. Under the PER UIC assemble the SP0L15 XXX program with 
MACRO-15 using as assembly parameters: 

a. SPOLSZ = the value determined in 4 above. 

b. FB = the value determined in 5 above. 

7. Under the PER UIC assemble the SPLIMG XXX program with 
MACRO-15 using the assembly parameter: 

a. SPOLSZ = the value determined in 4 above. 

8. For API systems issue the DOS-15 command API OFF. 

9. Place the SPOLll absolute binary paper tape in the reader. 
10. Issue the DOS-15 command GLOAD and type: 

$ GLOAD ) 

>-.- SPLIMG (ALT] 



11. The SPOLll paper tape will be read in and a "DONE" message 
will be typed on the console terminal when completed. 

12. Next MICLOG and assign DAT-10 to the PER UIC 

$ A RK <PER> -lo) 
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13. Run PATCH and type: 
$ PATCH ) 
> SPOOL ^ 



> READ 



SPOLI5) 



>EXIT 



) 



This will append the PDP-15 portion of the spooler to the 
previously loaded PDP-11 portion. 



2.3.4 PDP-15 UNICHANNEL Handlers 

PDP-15 UC15 Handlers that are not to be spooled must be assembled with 
the NOSPL = assembly parameter. Those handlers that are to be 
spooled must be assembled without this parameter defined. The initial 
RK05 system supplied by DEC contains handler binaries under the < lOS > 
UFD that were assembled as follows: 

1. LPA. was assembled to allow spooling 

2. CDB. was assembled with NOSPL = to not allow spooling. 

3. XYA. was assembled with NOSPL = to not allow spooling. 

Any alteration of the mix of spooled devices requires reassembly of 
the handler sources. (Location under the <PER> UFD. See the DOS 
Assembly Parameter Manual , for additional assembly parameter options.) 
The resulting binaries must be renamed (see Section 2.7.2) and trans- 
ferred to the <IOS> UFD. 

2.3.5 SPOOLER Size Constraints 

The following should be considered an absolute constraint on the num- 
ber of devices spoolable on the UC15 system. 

1. A 4K local memory system can have no spooled devices 

2. An 8K local memory system can have up to 2 spooled devices 

3. A 12K local memory system can have up to 4 spooled devices 

(DEC only provides spooler modules for 3 devices. Additional 
spooled device modules must be added by the user. Refer to 
chapters 5 and 6 for information on how to do this) . 



2.4 PERIPHERAL OPERATION 



2.4.1 Disk Cartridge 

On the front of the disk cartridge unit there are two (optionally a 
third, ON/OFF) toggle switches, RUN/LOAD, and WRITE/PROT. To load 
the disk, press ON (if present) and LOAD. Pull the door open. Pick 
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up the cartridge by the molded hand-grip, metal side down, horizontal, 
and slide gently into the path between the wire guides. Shut the 
door. Put the LOAD/RUN switch into the RUN position. In about 10 
seconds, the two lights, RDY and ON CYL will come on, indicating 
that the cartridge is ready. To unload the disk, place the toggle 
switch on LOAD. Wait for about 30 seconds until the LOAD light is 
on. _ At this time, the drive will release the cartridge with a 
noticeable 'clunk', only then open the door and pull the cartridge 
out. 

WARNING 

Do not turn off the drive while unloading 
(if drive has an OFF-ON toggle) . 

2.4.2 Plotter 

I Unlike the XY311, the XYll does not have an offline switch. In order 
to be able to indicate the XYll plotter off-line condition, provision 
is made in the software through the PDP-11 console switches. By set- 
ting bit '2' of the console data/address switches in the up/on posi- 
tion ('!• state) the plotter can be put in the off-line mode. This is 
made possible by the plotter device driver task in PIREX, which moni- 
tors this bit before initiating each plotter I/O requests. Once 
the plotter problem condition (e.g., out of paper) has been corrected, 
plotting will continue automatically when bit '2' of the console 
switches is reset to zero (down position) . 

The user is provided with the capability of halting the output on the 
plotter at the end of current file in the spooled mode. This is done 
through bit '3' of the PDP-11 console switches. By setting bit '3' of 
the console data/address switches in the up/on position ('1' state) 
output on the plotter can be halted at the end of current file. The 
plotter driver task in PIREX provides this facility by monitoring this 
bit before initiating each plotter I/O requests. After performing the 
necessary operations on the plotter, output can be resumed by setting 
bit '3' of the console switch in the down/off position ('0' state). 

2.4.3 Card Reader 

For the purposes of spooling, a card with ALT MODE, ALT MODE in col- 
umns 1 and 2 is used as an end-of-deck card. The handler throws away 
such cards, continuing on to the next card, so that the PDP-15 pro- 
gram using the handler never sees this card. This card is usedn't© 
force data from a partially filled internal spooler buffer onto the 
disk where it can be despooled to the PDP-15. 

2.4.4 Line Printer 

Output to the Line Printer can be halted at the end of current file in 
the spooled mode. This is done through bit '1' of the PDP-11 console 
switches. By setting bit '1' of the console data/address switches in 
the up/on position ('1' state), outputs on the line printer can be 
halted at the end of current file. The Line Printer driver task in 
PIREX provides this facility by monitoring this bit before indicating 
completion of .CLOSE I/O request . processing. After performing the 
necessary operations on the line printer, output can be resumed by 
setting bit '1' of the console switch in the down/off position CO' 
state) . 
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2.5 ERROR HANDLING 

Within the PIREX system, the device drivers on the PDP-11 side handle 
errors by placing error condition indicators in a table in PIREX. On 
the PDP-15 side, a "poller" (part of the resident monitor of the 
operating system) periodically searches the table to see if any error 
messages are to be printed. In almost all cases the recovery is auto- 
matic when the error condition is rectified. See Appendix C for a 
list of UC15 related error messages. 

2.5.1 Disk Cartridge Errors 

Disk cartridges must be positioned properly during loading operations. 
Improper positioning of the cartridge can result in a drive not ready 
condition. 

This condition can be eliminated in most instances by unloading the 
cartridge, repositioning it properly and reloading the cartridge. 

The above operations should be repeated a few times before reporting 
the problem to your field service representative. Do not force the 
cartridge into or from position during the loading or unloading 
operation. 

2.5.2 Card Reader Errors 

The system divides card reader errors into two groups: hardware and 
software. A hardware error is a hardware read error (pick check, card 
:am, etc.) or an illegal punch combination. A software error is a 
supply error (hopper empty, stacker full) or an off-line condition. 

For all hardware errors, the card causing the error will be on the top 
of the output stack. With most hardware errors, the card reader will 
stop, and a requisite light (i.e., pick check) will light on the 
reader. Remove the card, repair or replace it, and put it on the 
front of the input stack. Press the RESET button. The driver receives 
an interrupt when the device becomes ready again and will restart 
automatically . 

For software errors, the card in the output hopper has already been 
read. It is merely necessary to fix the supply error and press the 
RESET button. Note that the card reader can be stopped by pressing 
the OFF-LINE button. To restart, press the RESET button. 

Illegal punch combination (lOPSUC CDU 72) and card column lost (lOPSUC 
CDU 74) are exceptions to all other errors because in these cases 
alone, the card reader will stop, remain on line, and no diagnostic 
Ixght will be lit. The card causing the error will be in the top of 
the output hopper. (Mangled cards may cause an illegal punch combina- 
tion error.) Press the OFF-LINE button, repair or replace the faulty 
card, put it on the front of the input stack, and press the RESET 
button to restart. 



2.6 SYSTEM CRASHES 

During program development under PIREX on the PDP-11, system crashes 
may occur. Such crashes may not be apparent because PIREX keeps 
both the RUN light and bit lit as if no problem existed. PIREX will 
then either not respond at all or return illegal event variable values 
Under these circumstances, reload PIREX and reboot the operating sys- 
tem on the PDP-15. 
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2.7 UNICHANNEL RELATED SOFTWARE COMPONENTS 

2.7.1 UC15 Components 



NOMENCLATURE 


SOURCE FILE NAME 


BINARY FILE NAME 


PIREX Executive 


PIREX XXX 


PIREX paper tape 


SPOOLER 


SPOLll XXX 


SPOOL *** 


PDP-11 Absolute Loader 


ABSLll XXX * 


ABSLll paper tape 


MACll Assembler 


Special DOS-11 Tape** 


MACll *** 



2.7.2 DOS-15 Components 



NOMENCLATURE 


SOURCE FILE NAME 


BINARY FILE NAME 


PDP-15 SPOOLER 
Component 


SP0L15 


XXX 


SPOOL *** 


SPOOLER Disk Area 
Allocation 


SPLGEN 


XXX 


SPLGEN BIN***** 


SPOOLER Image 
Loader 


SPLIMG 


XXX 


SPLOAD BIN***** 


PDP-15 MACll 
Component 


MAC INT 


XXX 


MACll *** 


MACRO Image Loader 


MAC IMG 


XXX 


MACIMG BIN 


DOS Resident Monitor 


RESMON 


XXX 


RESMON **** 


DOS Non-Resident Monitor 


DOSNRM 


XXX 


D0S15 **** 



* ABSLll requires a special assembler, that is not available as a 
supported product. Assembly of ABSLll with the standard DOS-15 MACRO 
Assembler produces a paper tape with a load address of 17720. 

** The MACll source is a PDP-11 tape that must be assembled and 
linked under DOS-11. 

*** SPOLll and MACll are combinations of PDP-15 and PDP-11 code 
segments. 

**** These routines are versions of standard DOS-15 source files - 
created using special assembly parameters - see the DOS Monitor 

User's Manual . 

***** DOS-15 V3B000 components. 
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NOMENCLATURE 


SOURCE FILE NAME 


BINARY FILE NAME 


PDP-15 LPll/LSll/LVll 
Line Printer Handler 


LPU . XXX 


LPA. BIN 


PDP-15 XY11/XY311 Plotter 
Handler 


XYU . XXX 


XYA. BIN 


PDP-15 CRll Card 
Reader Handler 


CD . DOS XXX 


CDB. BIN **** 



**** These routines are versions of standard DOS-15 source files - 
created using special assembly characters - see the DOS Monitor 

User^s Manual. 



2.7.3 RSX-PLUS III Components 



NOMENCLATURE 


SOURCE FILE NAME 


TASK NAME 


Fixed-Head Disk File Handler 


RFRES 


RK 


Disk File Handler Overlay- 


RFOPEN 


RK 


Disk File Handler Overlay 


RFCLOS 


RK 


Disk File Handler Overlay 


REREAD 


RK 


Disk File Handler Overlay 


RFDLET 


RK 


Disk File Handler Overlay 


RFCREA 


RK 


Line Printer Handler 


LP. 30 


LP 


Card Reader Handler 


CD 


CD 


UNICHANNEL Poller 


POLLER 


POLLER 


Spooler 


SPOOL 


. . . SPO 


Executive 


RSX.Pl 

and 
RSX.P2 





These items are usually on DECTAPE or magnetic tape 
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CHAPTER 3 
SYSTEM DESIGN AND THEORY OF OPERATION — PIREX 



This chapter describes the design and theory of operation of the 
UNICHANNEL-15 Peripheral Processor Executive. Knowledge of this 
infoirmation is necessary to successfully modify the UNICHANNEL-15 
Software System. Chapter 4 will discuss techniques for modification 
of the PIREX system. 



3.1 PIREX — PERIPHERAL EXECUTIVE 

PIREX is a multiprogramming peripheral processor executive designed 
to provide device driver support to operating systems on the PDP-15 
main-processor. PIREX is designed to be as independent of the par- 
ticular PDP-15 operating system as possible, executing in conjunction 
with DOS-15, BOSS-15, or RSX-PLUS III. The PIREX Software System is 
designed to maximize flexibility and expandability and to minimize 
system overhead and complexity. To accomplish this, special software 
and hardware features are designed into the system. 



3.1.1 PIREX-An Overview 

PIREX is loaded from the PDP-15 high-speed reader into the PDP-11 
local memory and automatically started. Once running, PIREX is 
capable of accepting multiple requests and directives from the PDP-15 
or PDP-11 and processing them on a controlled-priority basis. Task 
requests are automatically queued (see Figure 3-1) and processed when- 
ever the task in reference is free. When a particular device or 
routine completes the processing of a request, status information 
(e.g., parity or checksum errors, transfer OK, etc.) is passed back 
to the caller. 

At the completion of a PDP-15 request, an optional hardware interrupt 
is initiated in the PDP-15 on any one of 128 possible API trap loca- 
tions and at any one of 4 hardware API levels if requested. Since 
the software completely determines which interrupt vector and level 
to use when completing PDP-15 requests, the routines initiating the 
interrupts could actually be software routines used to simulate 
hardware conditions or just software tasks. If the request is issued 
from the PDP-11, the user may request an optional software interrupt 
after completion of the current request. 
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Basic Flow Chart of PDP-15/11 Request Processing 
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3.1.2 PIREX Components 

The PIREX executive consists of modules that provide support for 
multiple I/O oriented tasks operating asynchronously with each other, 
In addition, support is provided for other background tasks such as 
MACll. The services provided to tasks operating under PIREX include; 

• Context switching - transferring control of the PDP-11 
Central Processing Unit (CPU) from one task to another. 

• Interprocessor communication - receiving requests for 
service from, and, sending results to the PDP-15 main 
processor. 

• Intraprocessor communication - receiving requests for 
service from, and, sending results to tasks operating on 
the PDP-11 peripheral processor. 



• 



Scheduling - determining which task is to execute next. 

Request Queuing - stacking requests for a busy task until 
it is able to process them. 

Timing - providing a timed wake-up service for requesting 
tasks. 

Error Reporting - providing a list of current device and 
task errors to the PDP-15 executive, on demand. 

• Directive Processing - providing the PDP-15 monitor with 
specific services such as: notification of available 
memory space, connecting, disconnecting or stopping tasks 
and returning the status of certain tasks. 

These services are provided to both device driver tasks and back- 
ground tasks . 



3.1.3 Device Drivers 

Device Drivers are tasks that typically perform rudimentary device 
functions such as read, write, search, process, interrupt, etc. They 
can, however, be complete handlers, performing complex operations 
such as character generation and directory searching. PIREX provides 
each driver with requests for I/O actions and returns the results of 
the actions to the caller. Associated drivers are provided for the 
RK05 Disk Cartridge, the LPll/LSll/LVll Line Printer, the CRll Card 
Reader, and the XYll Plotter. 



3.1.4 Software Routines in Background Mode 

The following are run as background tasks — executing only when I/O 
driver tasks are idle: 

1. SPOLll — an input/output spooling processor 

2. MACll — A MACRO assembler for the PDP-11 



3-3 j-21 



DOS-15 V3B000 Update Document 



3.1.5 Unsupported Tasks 

All tasks supplied with the PIREX software system are fully supported 
by Digital Equipment Corp, except the DECtape Driver task (DT) and 
LVll Plotter tasks. The DT task has not been completely tested, but 
is included in the system for illustrative purposes and for anyone 
who may desire to develop DECtape capability on the PDP-11. The LVll 
task is designed to allow .TRAN operations to the LVll when used as a 
plotter (instead of as a printer) . This task was developed for the 
demonstration of vector scan plotting techniques. The task is unsup- 
ported because the vector scan routines are not currently available 
from DEC. 



3.1.6 Power Fail Routine 

A power fail section is present in PIREX. It is, however, not 
supported by DEC and currently only saves the general registers and 
does not attempt to handle I/O in progress. This routine could be 
expanded by the user into a complete power fail handler. 

3.2 PIREX - SIMPLIFIED THEORY OF OPERATION 

3.2.1 NUL Task 

When the PIREX Software System is running, it is normally executing 
the NUL Task (a PDP-11 WAIT instruction) . The NUL Task is executed 
whenever there are no other runnable tasks or while all other tasks 
are in the WAIT state waiting for previously initiated I/O. The NUL 
Task entry is a permanent element in the Active Task List, The Active 
Task List is a priority ordered list of tasks that is used to schedule 
the next task to be executed. The NUL task occupies the last position 
in the Active Task List (ATL) . 

3.2.2 Clock Task 

One other permanent entry in the ATL is the Clock Task. The Clock 
Task is entered once every 16,6 milliseconds (for 60 hz machines). 
Its primary function is to provide other tasks with a wake up service. 
A typical use of the Clock Task would be to wake up the Line Printer 
Task every two seconds to check the Line Printer status for a change 
from OFF LINE to ON LINE. The Clock Task operates at the highest 
priority on the ATL. 
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3.2.3 Request Processing 

When the PDP-15 issues a request to the PDP-11 to be carried out by 
PIREX, it does so by interrupting the PDP-11 at level 7 (the highest 
PDP-11 priority level) and simultaneously passing it the address of a 
Task Control Block (TCB) through the interrupt link. This address is 
called the Task Control Block Pointer (TCBP) . A PDP-11 task can 
issue requests to other tasks via the IREQ macro. The IREQ macro 
simulates the PDP-15 request process and results in a TCBP being 
passed to PIREX. The contents of the Task Control Block completely 
describe the request (task addressed, function, optional interrupt 
return address and level, status words, etc.). The TCB will reside 
in the 'Common' Memory if the request is issued from the PDP-15 or in 
the 'Common' or 'Local' Memory if the request is issued from the 
PDP-11. 

The flow chart in Figure 3-1 illustrates the basic processing of 
requests to PIREX from the PDP-15 or the PDP-11. Note that error 
conditions are passed back to either central processor in the TCB or 
via an error table to the PDP-15 monitor poller along with status 
information necessary for control and monitoring of a request. 
Usually the request is to a device on the PDP-11 but other types are 
allowed. 



3.2.4 Task Structure 

A task is a PDP-11 software routine capable of being requested by the 
PDP-15 or PDP-11 through the PIREX software system. The task may be 
a device driver, a directive processor, or just a software routine 
used to carry out a specified function. A task must have the format 
shown in Figure 3-2, TASK FORMAT. 

**** LOWER CORE 
* * 

task stack area ' ' 



* * 
**** 

control register * * 

**** 

busy/idle switch * * 

* * 
**** 

* * 

task program * * 
code I I 

* * 

* * 

**** HIGHER CORE 



Figure 3-2 
Task Format 
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This structure consists of four sections; two are variable in size 
and two are fixed. 

The "task program code" size is variable and contains the program- 
ming code necessary to carry out the task function. 

The "busy/idle switch" consists of two words and is used by PIREX to 
determine if a task is busy or idle. The TCBP of the current request 
is stored in this section when the task is busy. This also enables 
a task to easily access the TCB. 

The "control register" is either a dummy address (an address which 
points to an unused software variable) or the address of a device 
control register if the task is an I/O driver. This word is used 
only by the STOP TASKS (ST) task when shutting down I/O operations. 

The "stack area" begins immediately below the control register and 
builds dynamically downwards. The purpose of the stack is to allow 
each task free use of a private space for temporary storage of data 
while it is executing and all its active registers during times when 
other higher priority tasks are being run. The stack area must be 
large enough to store the maximum number of temporary variables used 
at any one time plus one context register save. A context save 
requires 8 words of stack area plus an additional 3 words if the 
PDP-11 has an Extended Arithmetic Element (EAE) . The stack size is 
fixed and determined at PIREX assembly time. 



3.2.5 Task Control Block - TCB 

Tasks, in PIREX, receive requests for action and return the results 
of their action in bundles of information called Task Control Blocks 
(TCB) . The general format of a TCB consists of three words followed 
by task-specific optional words. The following information must be 
present in all TCBs since PIREX will honor requests in this format 
only. 



TCB: 



REV: 



15 8 


7 


API TRAP ADDRESS 


API LEVEL 


FUNCTION CODE 


TASK CODE NUMBER 


REQUEST EVENT VARIABLE 


OPTIONAL WORDS 



WORD 

WORD 1 

WORD 2 

WORD 3-N 



3.2.5.1 API Trap Address and Level - The API trap address is a PDP-15 
API trap vector and has a value between and 17 7 g when a hardware 
interrupt on the PDP-15 is required. Location corresponds to 
location in the PDP-15. The "API" level is the priority level at 
which the interrupt will occur in the PDP-15 and has a value between 
and 3 when a hardware interrupt on the PDP-15 is required. A 
signifies API level 0, a 1 for level 1, etc. The API trap address 
and level are used by tasks in the PDP-11 when informing the PDP-15 
that the requested operation is complete (e.g., a disk block trans- 
ferred or line printed). If the PDP-15 master computer doesn't have 
API or if API is not enabled, the PDP-11 issues an interrupt that 
when received is polled by the PDP-15 using 4 UC15 skips (one per 
level) on the traditional skip chain. 
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3.2.5.2 Function Code - The Function Code determines whether hard- 
ware interrupts on the PDP-15 or software interrupts on the PDP-11 
are to be used at the completion of the request. If the code has a 
value of 0, a hardware interrupt is generated on the PDP-15 at the 
completion of the request; if a 1, an interrupt is not made. If the 
Function Code is a 3, a software interrupt is issued by PIREX. The 
task routine or program using this facility sets up the trap address 
in the SENDll table in PIREX prior to issuing the request to the task, 
The task or route should return to PIREX after interrupt processing 
through an "RTS PC" instruction. All registers are available for use 
by tasks. 

3.2.5.3 Task Code Number - The Task Code Number (TCN) is a positive 
(l-177g)l or a negative (200-3778) "7-bit number plus a sign bit that 
informs PIREX which task is being referenced. The mnemonic TCN as 
used in this manual refers to the 7-bit portion of the Task Code 
Number. Tasks are addressed by a numeric value rather than by name. 
Tasks with positive code numbers are spooled tasks and tasks with 
negative code numbers are unspooled tasks. When the SPOOLER (see 
Chapter 5) is enabled and running, requests to spooled tasks are 
routed to the SPOOLER. When the SPOOLER is disabled, requests to 
spooled tasks are routed directly to device drivers. 



Task Code Numbers are currently assigned as follows: 
.2 



CODE 



TCN 



-1^ 


-1 


200 





201 


1 


202 


2 


203 


3 


4 


4 


5 


5 


6 


6 


207 


7 


210 


10 


211/11 


11 


212/12 


12 


213/13 


13 



TASK 
CL task (Clock) 
ST task (Stop Task) 
SD task (Software Directive) 
RK task (Cartridge Disk) 
DT task (DECTAPE) 
LP task (Line Printer) 
CD task (Card Reader) 
PL task (Plotter) 
SP task (Spooler) 
LV task (Printer/Plotter) 
Currently not used 
Currently not used 
Temporary Task Entry 



6 

Driver task-* 
Software task 
Directive task 
Driver task 
Driver task 
Driver task 
Driver task 
Driver task 
Background task 
Driver task 



Temporary task 



See 



(1) A task code of indicates the STOP TASKS DIRECTIVE 
Section 3.5 

(2) The code column corresponds to the typical task code in the TCB 

(3) The minus 1 is represented internally as 377 
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PIREX is currently capable of handling these 13 tasks. Tasks 11-13 
are spare task codes available for customer use.^ 



3.2.5.4 Request Event Variable - The REQUEST EVENT VARIABLE, 
commonly called REV, is initially cleared by PIREX (set to zero) when 
the TCB request is first received and later set to a value "n" (by 
the associated task) at the completion of the request. The values 
of "n" are: 

= request pending or not yet completed 

1 = request successfully completed 

-200 = (mod 2l^-l) nonexistent task referenced 

-300 = (mod 2l^-l) illegal API level given (illegal values 

are changed to level 3 and processed) 

16 
-400 = (mod 2 -1) illegal directive code given 

-500 = (mod 2 -1) no free core in the PDP-11 local memory 

16 
-600 = (mod 2 -1) ATL node for this TCN missing 

-777 = (mod 2 -1) request node was not available from the 

POOL (i.e., the node POOL was empty, and the referenced 

task was currently busy or the task did not have an 

ATL node in the Active Task List) 

When an address is passed in a TCB as data, the receiver of the 
address must relocate it to correspond to the addressing structure 
in its memory space. For example, a PDP-15 address passed to the 
PDP-11 must first be multiplied by two to convert word to byte 
addressing and then the local memory size (LMS) of the PDP-11 must 
be added. For example, 

PDP-11 address = (PDP-15 address *2) + LMS on PDP-11 

The reverse is true for a PDP— 11 address received by the PDP— 15 . For 
example , 

PDP-15 address = (PDP-11 address - LMS)/2 



3.3 SYSTEM TABLES AND LISTS 

The PIREX system uses various tables, lists, and deques to control 
events within the system. 



(1) See Section 4.4 for further information. 
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3.3.1 Active Tast List (ATL) 

The selection of a task for execution by PIREX is accomplished by- 
first scanning a priority-ordered linked list of all active tasks in 
the system called the Active Task List (ATL) . An active task is one 
which satisfies one or more of the following conditions: 

1. is currently executing 

2. has a new request pending in its deque 

3. is in a wait state, or 

4. has been interrupted by a higher priority task 

A task is inactive if there is no ATL node for it. A task can be in 
any one of the following states: 



CODE 

2 



STATE 
run 
wait 
exit 



ACTIVITY 
active 
active 
inactive 



When a runnable task is found, the stack area and general purpose 
registers belonging to that task are restored and program control is 
transferred to it through an RTI instruction. Program execution 
normally begins at the first location of the task diagram code (see 
Figure 3-2) or at the point where the task was previously interrupted 
by a higher priority task, or in special cases at any desired loca- 
tion in the task using the 'PC setting on the stack as in the RK 
task's error retry program logic. When a task is interrupted by 
other tasks, its general purpose registers are saved on its own stack. 
Control is returned to the interrupted task by restoring its stack 
pointer and then its active registers. 

The ATL is rescanned when: 

1. a new request is issued to a task 

2. a previous request is completed 

3. at the end of a clock interrupt 

4. a task goes into a wait state 

A task is said to be in a "wait" state when its ATL node exists and 
it is not runnable. 



3.3.1.1 ATL Nodes - The Active Task List is a linked list containing 
4 word entries called nodes. 
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MASREQ 



\PIREX request/ 



SLAREQ 



(PDP-11->PIREX\ 
REQUEST y 



3 t 



SAVE R0-R5 ON 
CURRENT STACK; 
UPDATE ENTRIES 
IN ATL NODE 



MASREQ 
entry 



READ TCBP FROM 


INTERRUPT LINK 


& RELOCATE TCB 







i 



SWITCH TO 
SYSTEM STACK 



GET TCBP AND 
RELOCATE IT. 
GET TASK CODE 




SLAREQ 
entry 



BUMP PC SAVED 
ON STACK TO 
RETRY ADDRESS 



<-^... 



next page 



TAKE REFERENCED 
TASK AS SPOOLER 



Figure 3-3 
Detailed Flow Chart of PDP-15/PDP-11 Request Processing 
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CALLTK ... 




LVL703 .. 



f LVL704 V 



SET EVENT VARIABLE 
IN CALLERS TCB TO 
'-2W*, INDICATING 
THAT AN ILLEGAL 
TASK (NON-EXISTENT 
ONE) WAS SPECIFIED 



SEND INTERRUPT BACK 
(IF REQUESTED) IN- 
FORMING THAT THE 
REQUEST COULD NOT 
BE PROCESSED 



^ AS. El j 



w i^Rescan the ATL 
^( from the top. 
^See Figure 3-4, 



Figure 3-3 (Cont.) 
Detailed Flow Chart of PDP-15/PDP-11 Request Processing 
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GET A NODE FROM 
POOL AMD HOVE 
IT TO THE REF- 
ERENCED TASKS 
DEQUE SAVE THE 
18 BIT TCBP IN 
THE NODE SO TASK 
WILL HAVE IT 
WHEN NEEDED. 



USE TCBP TO SET 
TASK'S IDLE/BUSY 
REGISTER TO BUSY 
AND CLEAR THE EV 
IN CALLERS TCB. 



LVL705 ., 




SCAN THE ATL 
FOR AN ENTRY 
(PRIORITY WISE) 
FOR THIS NODE 




SET CALLERS EV 
TO -777 (WORD 
16) INDICATING 
THAT THE SYSTEM 
IS TEMPORARILY 
OUT OF NOTES IN 
THE POOL. 



( LVL704 j 



REMOVE NODE FROI 
POOL AND PUT IN 
ATL 



i 



FILL IN TASK 
PRIORITY TASK 
CODE NUMBER, 
AND TASK STACK 
POINTER IN ATL 
NODE 



I 



SET TASK PRIORITY 
AND TASK START 
ADDRESS IN TASK'S 
STACK AREA TO BE 
USED WHEN TASK 
IS EXECUTED 






rueacan the 
'^J ATL froo 
~S top. See 
i^Figure 3-4 . 



Figure 3-3 (Cont.) 
Detailed Flow Chart of PDP-15/PDP-11 Request Processing 
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An ATL node has the following structure: 

WORD 1 - Forward pointer to next node 
WORD 2 - Backward pointer to previous node 
WORD 3 T Stack pointer of task 



WORD 4 



Task Priority 



15 14 13|l2 lljlO 


9 


8 


7 


6 


5 


4 


3 


2 


± 






Spooling Indicator 

= spooled 

1 = not spooled 

Task Code Number (TCNV 



TASK STATUS (States defined in 3.3.1) 



The ATL is referenced by a 2-word listhead. The listhead contains 
backward and forward links pointing to the first and last nodes in 
the list. The ATL is a priority-ordered list. 



3.3.1.2 ATL Node Pointer (ATLNP) - Each task has a pointer to its 
Active Task List Node (see Section 3.3.1.1) stored in the ATLNP 
table. This table is in TCN order. An entry is if the task is 
inactive . 

The format of an ATLNP entry is: 

; NAME task-code-number 

These entries are filled dynamically by PIREX with actual pointers. 

3,3,2 Task Request List (TRL) 

The Task Request Lists are doubly-linked, deque-structured lists of 
pending TCBs, If when a request arrives, the target task is busy, 
PIREX places the TCB pointer (TCBP) onto the busy task's deque for 
later processing. This deque is the Task Request List. 



(1) The "NAME task-code-number " is a comment 
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A TRL node has the following structure: 

WORD 1 - Forward pointer to next node. 
WORD 2 - Backward pointer to previous node. 



WORD 3 - 



Request Identifier 

= PDP-15 request 

1 = PDP-11 request 



15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 




Most significant bits of the TCBP (PDP-15) bits and 1 

WORD 4-16 least significant bits of TCBP {PDP-15 bits 2-17) 



Each TRL is referenced by a two-word listhead. The listhead contains 
backward and forward links pointing to the last euid first nodes of a 
given task's TRL. The TRL is built on a first come first serve basis, 



3.3.3 TRL Listheads (LISTED) 

Each task has its own Task Request List, (TRL) . Each LISTED entry is 
a double-linked listhead used to point to a task's TRL. The LISTED 
is a TCN ordered list. 

The format for an entry is: 

LISTBEAD XX 

where : 

1. LISTEEAD is a system macro 

2. XX is a two character task mnemonic (i.e., LP for Line 
Printer Task) . 



3.3.4 Clock Request Table (CLTABL) 

The Clock Table (CLTABL) contains entries for one timing (wake up) 
request from each task. The format of a CLTABLE entry is: 

XXl.CL = . 

.WORD 1 ; Time Word 

•WORD 1 ; Address Word 



(1) XX represents the task mnemonic (e.g., RK.CL) 
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Where the first word is remaining time before wakeup and the second 
word is the address for a JSR PC, XXX instruction. The JSR occurs at 
clock interrupt level (6) . The user must do an RTS PC to return 
control to the clock routine. Time is measured in line frequency 
ticks: 16.6 milliseconds/tick for 6 Hertz Systems. A task may cancel 
a timing request by clearing the time word. A request for a wakeup 
is made by: 

1. Placing the address of the routine to be called into 
word 2 - then 

2. Placing the time delay (measured in 1/60 sec. increments) 
into the time word. 

The above sequence must be exactly followed. See Chapter 4 for 
further details on the use of wakeup calls. CLTABL is a TCN ordered 
list. 



3.3.5 Device Error Status Table (DEVST) 

The DEVST table is used to store error status codes for delayed 
transfer to the PDP-15 monitor. The PDP-15 monitor contains a routine 
called the "Poller" which periodically requests error status codes 
from PIREX using a "get errors" software directive. This method of 
error transmission is useful for delayed error messages — such as 
those recognized on spooled devices. The specific PDP-15 I/O handler 
may no longer be present in the PDP-15 's memory — thus the Request 
Event Variable (REV) method of returning error status would be useless, 
The "Poller" requests the entire DEVST table and reports those events 
on the system console terminal. A "Get Errors" directive clears the 
DEVST table upon completion. The reporting task may, for instance, 
correct the error condition before the "Get Error" directive is 
issued. When this happens, the task could simply clear its message 
from the DEVST table and thus eliminate a spurious message. DEVST 
is a TCN ordered table. The format of a DEVST entry is as follows: 

WORD 1 - TASK (MNEMONIC IN SIXBIT/RAD50 RIGHT JUSTIFIED) 

WORD 2 - SPARE (except for RK task where bad disk block is 
present) 

WORD 3 ~ ERROR CODE: SPOOLER ERROR CODE (HIGH BYTE) 

TASK ERROR CODE (LOW BYTE) 

3.3.6 LEVEL Table 

The LEVEL table (task priority level) is used by the R.SAVE context 
switch routine to determine the priority level of the task about to 
begin execution. All interrupt vectors must specify a priority 7 
entry into their respective interrupt routines. Upon entry, R.SAVE 
should be called to save the interrupt task state and return control 
to the interrupt processing routine at the proper priority — found in 
the LEVEL table. The LEVEL table is a TCN ordered task. 

The LEVEL table entry format is: 

.BYTE task priority *40 
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3.3.7 Task Starting Address (TEVADD) 

The TEVADD Table contains the starting address of all defined tasks. 
The system currently has room for 13 g tasks of which three are tempo- 
rary entries used for tasks CONNECTED to and DISCONNECTED from PIREX, 
MACll is such a temporary task and uses the table entries of the 
currently unused highest task code. All PIREX systems must have at 
least one highest unused task entry to allow use of MACll. The 
TEVADD table is TCN ordered. 

The format of a TEVADD table entry is : 

.WORD START ; task name 

where START is either: 

1. The starting address of the task, or, 

2. indicating that this entry is currently unoccupied, 
where "Task name" is a comment. 



3.3.8 Transfer Vector Table (SENDll) 

The SENDll table is used to store transfer vectors for use when 
issuing IREQ macro calls. The entry is the address at which the 
requesting routine receives control back from PIREX. This table is 
TCN ordered. 

The format of a SENDll entry is : 

; task-name task- code-number 

where "task name task-code- number" is a comment. 



3.3.9 System Interrupt Vectors 

The device interrupt vector-pairs consist of interrupt routine address 
and priority level. The priority level of "all" devices should be 
Level-7 "only". This is to permit PIREX to do a context switch before 
Drocessina the interruot. 



3.3.10 Internal Tables Accessible to All Tasks 

All tasks in the PIREX system can easily access internal routines and 
tables through the use of the system registers. These registers begin 
at absolute location 1002g in the PDP-11 and contain either pointers 
to internal tables and listheads or entry points to commonly used 
subroutines. The following list summarizes these registers. 
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LOCATION 


MNEMONIC 


01002 




SENDll 


01004 


CURTSK 


: 000000 


01006 




POL . LH 


01010 




LISTHD 


01012 




R.SAVE 


01014 




R.REST 


01016 




AS. El 


01020 




MOVEN 


01022 




DEQU 


01024 




SEND15 


01026 




EMPTY 


01030 




ATLNP 


01032 




RATLN 


01034 




SPOLSW 


01036 




RTURN 


01040 


NBRTEV 


: NTEV 


01042 


PWRDWN 


: RTURN 


01044 


PWRUP : 


RTURN 


01046 


SPOLSW 


: 000000 


01050 




DEVST 


01052 




CLTABL 


01054 




DEQUl 


01056 




CEXIT 


01060 




TEVADD 


01062 


DEVARE 


: . WORD DEVTYP 


01064 


DEVSPL 


. WORD 


01066 


CTLCNT 


: .WORD 


01067 


SPUNIT : 


.WORD 



DESCRIPTION 

INT. RETURN ADD. (ON 11) ON END 

OF I/O 
CURRENT TASK RUNNING 
ADDRESS OF POOL LISTHEAD 
ADDRESS OF TASK LISTHEADS 
ENTRY POINT TO REGISTER SAVE 
ENTRY POINT TO REGISTER RESTORE 
ENTRY POINT TO ATL RESCAN 
ENTRY POINT TO NODE MOVER 
ENTRY POINT TO DEQUEUE 
ENTRY POINT TO SEND INTERRUPT 
ENTRY POINT TO EMPTY A DEQUE 
ATL NODE POINTER TABLE 
ENTRY POINT TO RETURN ATL NODE 
SPOOLER SWITCHES ADDRESS 
REUTURN INST. ADD. FOR PIC CODE 
CURRENT NBR OF TASKS 
ENTRY POINT TO PWR FAIL DOWN 
ENTRY POINT TO PWR FAIL UP 
SPOOLER SWITCHES 
DEVICE ERROR STATUS TABLE 
TABLE, A TIME-ADDR PAIR FOR EACH 

TASK 
ENTRY TO -SET TASK IN WAIT STATE- 
ROUTINE 
ENTRY TO -SET TASK IN RUN STATE- 
ROUTINE 
TABLE OF TASK START ADDRESSES 
PIREX DEVICES SWITCH 
DEVICES SPOOLED SWITCH 
PDP-15 CTL C RUNNING COUNTER 
DEVICE CURRENTLY BEING SPOOLED TO 



These registers are accessed as absolute memory locations by various 
permanent and temporary tasks. NO CHANGE in the location or order of 
this table is permitted. New system registers may be added to the end 
of this table. 



3.4 DETAILED THEORY OF OPERATION-PIREX 



3.4.1 Request Procedure 

The UC15 system allows the PDP-15 to initiate requests to the PDP-11 by 
interrupting at the highest PDP-11 hardware level and simultaneously 
passing to it an 18-bit Task Control Block address. Only the first 16 
bits are used because PIREX does not support an external memory option 
on the PDP-11. Requests from the PDP-15 or PDP-11 could be for: 



(1) Memory management hardware support is not a feature of PIREX. 
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1. a directive-handing routine 

2. a data transfer to or from a device driver task on the PDP-11 

3. a background software routine (task) 

3.4.2 Directive Handling 

Directive handling consists of such functions as: 

1. Connecting and disconnecting tasks from the PIREX system 

2. Reporting core status on the PDP-11 local memory to the 
calling routine 

3. Stopping I/O on a particular device or all devices 

4. Reporting UNIBUS device status to the calling routine 

2 

5. Stopping any or all tasks currently running 

6. Reporting spooler status to the caller 

3.4.3 Logic Flow 

The flow charts in Figures 3-3, 3-4, and 3-5 illustrate in detail the 
program logic flow when a request from the PDP-15 or PDP-11 is made to 
PIREX. Note that PIREX is capable of servicing requests in parallel 
on a priority basis. 

3.4.4 Operating Sequence 

PIREX is usually running the NUL task waiting for something to do. 
When a request is issued from the PDP-15 or PDP-11, PIREX immediately: 

1. saves the general-purpose registers onto the stack belonging 
to the current task running 

2. saves the stack pointer in the ATL nodes 

3. sets the task in a RUN state 

4. switches to the system stack (refer to Figure 3-5) 

All of the preceding is done at level 7 (protected) . The system stack 
is used when switching between tasks or rescanning the ATL. 

In the case of a PDP-15 request, the TCBP (Task Control Block Pointer) 
register is now immediately read by the PDP-11 allowing additional 
requests to be made. PIREX corrects the TCBP by an amount equal to 
the PDP-11 local memory when a request comes from the PDP-15. The 
TCBP is present in R4 and R5 when the IREQ macro is issued by a 
PDP-11 routine and the PDP-11 is able to address the TCB directly and 
retrieve information from it. The task code number is then obtained 
from the caller TCB and used to determine which task or directive 
that is being referenced. 



(1) See Section 3.6 for additional information. 

(2) See Section 3-5 for additional information, 
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AS.TE 
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HAS BEEN FOUND, 
SAVE SYSTEM 
STACK POINTER, 
AND SWITCH TO 
NEW TASK ' S STACK 



I 



RESTORE ALL SYSTEM 
REGISTERS R0-R7 



f GO TO TASK J 



f AS. El J 

BEGIN SCAN OF 
ATL STARTING AT 
THE ATLLISTHEAD 



5 



ADVANCE SEARCH 
TO NEXT NODE 



( ""^ y^^^ 



REMOVE THE TASK 
STATUS (TS) FROM 
NODE AND USE IT 
TO DISPATCH TO 
THE APPROPRIATE 
PROCESSING 
ROUTINE 



TS=2 



AS.STP 



TASK IS IN A 
WAIT STATE, 
BY-PASS IT. 



] 



TS=4 I 



TASK MUST BE 
STOPPED. RETURN 
TO ATL NODE TO 
POOlI (KEEP LINK 
TO NEXT NODE.) 



I 



f AS.SCN j ( AS.E2 j 



Figure 3-4 
Scan of Active Task List (ATL) 



3-19 



f R.SAVE J 



SAVE R1-R5 (R0 
SAVED ON CALL) 
AND AC,MQ,SC IF 
EAE OPTION 



I 



GET TASK CODE 
(TCN) AND BUMP 
R0 TO RETURN 
ADDRESS 



I 



SAVE CURRENT 
TASK'S 'SP' IN 
ATL NODE 




SET 'SP' FROM 
INTERRUPTING 
TASKS ATL NODE 



I 
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RUN STATE 



I 
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Figure 3-5 
Context Switch or Save General Purpose Registers R0-R5 
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A check is made to determine if the called task is a spooled task or 
not. If bit 7=0, it is a spooled task and if bit 7=1, it is an 
unspooled task. If the called task is a spooled task and if the SPOOLER 
is enabled, the request is processed by the SPOOLER. If the SPOOLER is 
not enabled, a check is made to determine if the task in reference is 
currently active and busy with a previous request. If so, the request 
is queued to the task's deque (TRL) on a first come, first serve basis. 
If the task in reference is currently inactive, an ATL node is built 
containing the appropriate entries, the address of the ATL node is set 
in the ATLNP table and the task's priority in the LEVEL table. Jn 
either case, the ATL is rescanned and the highest priority task is 
selected for execution (see Figure 3.4). 

UC15 peripherals, controlled by PIREX, use a minimal driver to carry out 
requested functions and report the results back to the calling task 
via the TCB. When a driver finishes a request (whether an error 
occurred or not) , it informs the requestor by placing the results (status 
and error register) in the TCB associated with that request and sends 
an optional hardware or software interrupt back to the requestor. 

The request event variable (REV) is set prior to sending an interrupt 
to the PDP-15/PDP-11 and may be used by the PDP-15 or PDP-11 to deter- 
mine if a request has been processed. This method is used during times 
when interrupts are not enabled or desired (as during the bootstrapping 
operation on the PDP-15) . The hardware interrupt to the PDP-15 (see 
Figure 3-6) is optional and can be made at any of the PDP-15 API hard- 
ware levels and trap addresses. The API level and trap address are 
specified in the TCB associated with each request to allow complete 
flexibility in interrupt control. 



3.4.5 Software Interrupt 

A software interrupt return for the PDP-11 tasks is optional. This 
feature is available only if a hardware interrupt return to the PDP-15 
is not required. To generate a software interrupt, the task using the 
request has to set the trap address before issuing the request. Each 
task running under PIREX has an entry in the SENDll Transfer Vector 
Table. PIREX traps to this location on completion of a request by 
executing a JSR PC, SENDll (Task Code *2) . The task issuing the 
request specifies its task code in the TCB. All registers are free 
to be used when the control is transferred. Control is returned to 
PIREX through an RTS PC instruction. 



3.4.6 Task Completion 

When the PDP-15 has been notified (via interrupt) that its request has 
been completed, the task completing the request under PIREX becomes 
idle and calls DEQU (see Figure 3-7) to determine if any additional 
requests are pending. If no requests are pending, control is trans- 
ferred to the ATL scanner (after saving the stack pointer and setting 
the current task in a wait state in its ATL node) . If additional 
requests exist, the next request in the task's TRL is processed as 
if it were just received. 
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Figure 3-6 
Send Hardware Interrupt to PDP-15/Software Interrupt to PDP-11 
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Figure 3-7 
Dequeue Node From Task's Deque, 
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3.5 STOP TASKS 

The STOP TASKS Task is used to stop tasks and/or I/O currently underway 
for either all tasks or for a particular task. STOP TASKS can cancel 
all requests or only PDP-15 requests for the indicated task(s). There 
are four possibilities: 

1. Stop all tasks unconditionally and cancel all pending PDP-15 
requests 

2. Stop a given task unconditionally and cancel all pending PDP-15 
requests to that task 

3. Cancel all PDP-15 requests to all tasks - this has no effect 
on PDP-11 requests 

4. Cancel all PDP-15 requests to a given task - this has no 
effect on PDP-11 requests 

The process of stopping a task includes (1 or 2 above) : 

1. Removal of all appropriate PDP-15 request nodes in the 
task(s) TKL{s) 

2. Zero the Busy Idle Switch for the task(s) 

3. Clear the I/O device register (s) for the task(s) 

4. Set the tasks status in the ATL to EXIT (for a temporary 
task) or WAIT (for a permanent task) . 

5. Indicate completion by setting the REV of the STOP TASKS 
requestor. (An interrupt return is not allowed.) 

The Stop Tasks TCB has the following format; 

15 



TCB: 



REV: 








TCN 


200 


REV 



Word 
Word 1 
Word 2 



bit 15 = 1 cancel PDP-15 requests and the 

current pending request unconditionally. 

bit 15 = cancel PDP-15 requests 

TCN = cancel all Tasks 
TCN i- cancel Task TCN only 

REV = Return Event Variable 

STOP TASKS is typically used by the PDP-15 operating system to quiet 
all interaction between the PDP-15 and the PDP-11. 

3.6 SOFTWARE DIRECTIVE PROCESSING 

The software directive task provides two main capabilities. These are: 

1. The capability to connect and disconnect temporary tasks to 
PIREX (such as MACRO- 11) . 

2. The capability to obtain various PIREX status information. 
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These capabilities are provided via five software directives, which are 
described later in this section. 

The general format for software directive task control blocks is as 
follows: 



,15 




8,7 




fS 


1 1 


ATA 
1 1 1 1 


I 
1 1 1 


ALV 
1 1 1 


1 1 


» • 


FCN 
1 1 1 1 


1 1 1 


201 
1 I I 


1 • 


REV 
' » t t f f 1 ' > » J.. .1.., T I t I 



OPR ; 
I I I I I I I I 



Contents Depend 
Upon 



word 
word 1 
word 2 
word 3 



/ "^ / 

I Directive ; word n 
I I t I • I t I I I I I I I I I I I 



ATA PDP-15 API interrupt vector address 

ALV PDP-15 API interrupt priority level. Must be 0, 1, 2, or 3 
(unless FCN = 3) . 

FCN Function to perform upon completion of this software directive 
request. Valid values are: 

000 Interrupt the PDP-15 at address ATA, priority ALV. 

001 Do nothing (except set REV) . 

003 Cause a software interrupt to the PDP-11 task whose 
task code number is in ALV. 

REV Request Event Variable. Initially zero, set to a non-zero 

value to indicate completion of the software directive request. 
The meaning of the various return values is described below. 

OPR Indicates the exact operation (directive) to be performed. Must 
be one of the following values : 

Disconnect Task 

1 Connect Task 

2 Core Status Report 

3 Error Status Report 

4 , Spooler Status Report 

5 MOVE 
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Returned REV values 



1 
-300 

-400 
Other 



Successful completion 

Invalid ALV value. The request may or may not have 
been performed - see individual directive descriptions 
The PDP-15 will be interrupted at level 3. 

Invalid OPR (directive/operation code) value. 

See individual directive descriptions. 



The following sections contain detailed descriptions of the individual 
software directives, their task control block (TCB) formats, and the 
REV values they may return. 



3.6.1 Disconnect Task Directive 

The disconnect task software directive instructs PIREX to delete a 
task from the active task list. Request should not be issued to a 
task after it has been disconnected. An attempt to issue a request 
to a disconnected task will result in a returned REV value of -200, 
implying that a non-existent task was referenced. The format of the 
task control block for the disconnect task software directive is as 
follows: 

.15 8.7 ff 



ATA 



ALV 



FCN ; 2j2fl 
» ' t I 1 I I I I 



REV 
' » t I t I I I t 



000 ; TCN 

» 1 » I I I I t I 



REL 
' 1 t I t I I I I 



First Address 
» I » I t I I I 



unused 
» 1 t t I I I I I 



Length 



word 
word 1 
word 2 
word 3 
word 4 
word 5 
word 6 
word 7 



TCN 
REL 



the task to be disconnected, 

000000 if the task resides in PDP-15 memory 
100000 if the task resides in PDP-11 memory 



First 
Address 



Length 



PDP-11 byte address of the first location in memory 
occupied by this task (the lowest address of the task 
stack area) . Only meaningful if the task resides in 
PDP-11 memory - if the task resides in PDP-15 memory 
this word is ignored. 

Total size (in bytes) of this task, including stack 
area, control register, busy/idle switch, and program 
code. Only meaningful if the task resides in PDP-11 
memory — if the task resides in PDP-15 memory this word 
is ianored. 
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The disconnect task software directive verifies that the task to be 
disconnected is on the active task list. If present on the list, the 
task is disconnected - the active task list node is returned to the 
pool, the task's entry in the TEVADD table is cleared, and the task's 
task request list is cleared. If the task resides in PDP-11 memory, 
an attempt is made to free the memory space occupied by the task - if 
the first free local memory address is the address immediately 
following the storage area occupied by the task (as determined from 
the first address and length arguments), the task's first address 
becomes the new first free local memory address. 

RESTRICTIONS: 

1. If a task does not have an active task list node, it cannot 
be disconnected. Therefore, once a task has been connected, 
it cannot be disconnected until after a request has been 
issued to it. 

2. All requests which are on the task request list of a task 
which is disconnected are forgotten. Such requests will 
never complete; their request event variables (REVs) will 
never be set to a non-zero value. 

3. PDP-11 local memory resident tasks should only be discon- 
nected if they are the last (highest address) task in local 
memory. If PDP-11 local memory resident tasks other than 
the last are disconnected first, the memory space occupied 
by these tasks will not be released. This will result in 
holes (of unusable memory) in the PDP-11 's local memory. 

4 . Tasks should be disconnected in reverse sequential order by 
task code number. A task should not be disconnected if there 
are any connected tasks with higher task code numbers . 

5. The high order bit of the task code number (TCN) must be 
clear. 

Returned REV values : 

1 Task successfully disconnected 

2 Task successfully disconnected, but the (PDP-11 local) 
memory occupied by this task could not be released. 

-300 Invalid ALV value, the task may or may not have been 

disconnected, its memory may or may not have been released. 

-600 Task to be disconnected is not on the active task list (i.e., 
node not present) 



3.6.2 Connect Task Directive 

The connect task software directive instructs PIREX to add a new task 
to the system. Once a task has been connected to PIREX, the PDP-15 
and/or other tasks may issue requests (task control blocks) to it. 
The format of the task control block for the connect task software 
directive is as follows: 
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15 



8.7 



ATA ; ALv : 

1 1 1 • 1 1 1 1 • 1 1 1 1 i 1 1 


— 1 1 

FCN ; 2J2I1 ; 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


REV 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


001 ] TCN 
1 1 1 1 • I 1 1 1 1 1 • 1 • 1 


REL 
1 1 I 1 1 f 1 1 1 1 1 1 1 1 1 


unused 
1 1 1 1 1 • 1 1 1 1 1 1 • 1 1 


Entry Point 
1 1 1 1 1 f t 1 1 1 1 1 1 1 1 1 


I Length 

1 1 1 1 1 1 1 1 1 1 1 1 1 I t 1 


1 1 

; unused ; Priority 
1 1 1 1 1 1 f 1 1 1 1 1 1 1 1 I 



word 
word 1 
word 2 
word 3 
word 4 
word 5 
word 6 
word 7 
word 10 



TCN 



REL 



Entry 
Point 



Length 



The new task's task code number (TCN) 

000000 if the new task resides in PDP-15 memory. 
100000 if the new task resides in PDP-11 memory. 

Address of the new task's entry point - i.e., the 
first location of the task's program code. This 
address is a PDP-11 byte address if the new task 
resides in PDP-11 memory, a PDP-15 word address if the 
new task resides in PDP-15 memory. 

Total size (in bytes) of the memory space occupied by 
this task, including stack area, control register, busy/ 
idle switch, and program code. Only meaningful if the 
task resides in PDP-11 memory - if the task resides in 
PDP-15 memory this is ignored. 

Priority The task's priority *40 . 

8 

The connect task directive enters the new task start address 
(appropriately relocated if the new task resides in PDP-15 memory) 
into the TEVADD table. The directive does not actually create an 
active task list node for the new task; this occurs only when the 
first request is issued to the new task. The directive clears the 
new task's busy/idle switch (sets the task in idle state) and empties 
the new task's task request list. The new task priority is placed in 
the LEVEL table. If the new task resides in PDP-11 memory, PIREX 
updates its memory usage information by adding the size of the new 
task to the first free local memory address. 



3-28 



DOS- 15 V3B0i2fj2f Update Document 



RESTRICTIONS: 



1. The task code number must not be in use (correspond to any 
currently connected or permanently installed task) at the 
time this directive is issued. 

2. The task code number must have been provided for when PIREX 
was assembled. As distributed by DEC, PIREX provides for 
task code numbers Og through 13g inclusive. 

3. The high order bit of the task code number must be clear. 

4. If the task resides in PDP-11 memory, the first address it 
occupies must be the first free local memory address, as 
returned by the core status report software directive. 

5. If the task resides in PDP-15 memory, it must reside 
entirely within the area addressable by the PDP-11 's 28K 
addressing range. 

6. Tasks should be connected in sequential order by task code 
numbers. Temporary tasks (tasks which will subsequently be 
disconnected) should always be connected to a task code 
number one higher than that obtained via the core status 
report software directive. 

Returned REV values : 

1 Task successfully connected 

-300 Invalid ALV value. Task has been connected. 

3.6.3 Core Status Report Directive 

The core status report software directive returns information regard- 
ing PDP-11 local memory and task code number usage in PIREX. The 
format of the task control block for the core status report software 
directive is as follows: 



,15 8,7 




0. 


; ATA ; 
I 1 1 1 1 1 1 1 1 1 1 


ALV 
1 1 1 1 




I FCN ; 

1 1 1 1 1 1 1 1 1 1 1 


2j2fl 
1 1 1 1 


1 1 


; REV 

t 1 1 1 1 1 1 1 1 1 1 1 1 1 1 




1 1 1 1 1 • 1 1 1 1 1 


TCN 
1 1 1 1 




} Local Memory 
1 1 1 1 1 f 1 1 1 1 1 


Size 
1 1 1 1 




1 First Free Address 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 




J unused 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 




J Niunber of Free 
1 1 1 1 1 1 1 1 1 1 1 


Words 
1 1 1 1 





word 
word 1 
word 2 
word 3 
word 4 
word 5 
word 6 
word 7 
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TCN 



Local Mem- 
ory Size 

First Free 
Address 

Number of 
Free Words 



RESTRICTIONS: 
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Set to the highest currently connected task code 
number in PIREX. 

The amount of local memory in the PDP-11 UNICHANNEL. 



Set to the PDP-11 byte address of the first free 
(unoccupied) address in local memory. 

Set to the number of unused words in PDP-11 local 
memory. Equal to ((Local memory size in bytes) - 
(First free address) )/2. 



1. The core status report software directive has no restrictions 
However, the restrictions (especially those regarding order 
of use of memory and task code numbers) on the connect and 
disconnect software directives must be adhered to in order to 
have valid information returned by core status report. 

Returned REV values : 

1 Successful completion 

-300 Invalid ALV value. No information returned. 

-500 No free PDP-11 memory. No information returned. 



3.6.4 Error Status Report Directive 

The error status report software directive returns information regard- 
ing device and/or spooler errors which have occurred since the last 
time this directive was issued. The format of the task control block 
for the error status software directive is as follows: 



,15 




8,7 


0, 


I 1 1 


ATA 
1 1 1 


; ALV 
1 1 1 1 1 • 1 1 1 


1 1 


I 1 1 


FCN 
1 f 1 


1 

I 201 
1 1 1 1 1 1 1 I 1 


1 1 


; REV ; 
1 1 1 1 1 1 1 1 1 1 1 1 I 1 1 1 I 


1 1 1 


003 
I 1 1 


1 

I unused 
1 1 1 1 1 1 1 1 1 


1 1 






Returned 





word 

word 1 

word 2 

word 3 

word 4 

/ Error ^^ 

J Information J word n 
' t I I t I I I t t I I 1 t I I I 
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The error status report software directive copies error status informa- 
tion from the DEVST table onto the requestor's task control block, 
then clears the DEVST table to store new error information. The error 
information returned consists of a series of three word blocks, one 
per PIREX task. As distributed by DEC, eleven such blocks will be 
returned - one for each permanent task (excluding the clock task) 
plus two more for spare or temporary tasks. The number of these blocks 
returned may change, however, if users alter the number of tasks 
(especially permanent tasks) in PIREX. The format of each of these 
three word information blocks is as follows: 



,15 8,7 


0, 


J Task Name ', 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


1 unused — zero 1 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


1 1 

; SPLERR ; DEVERR 
1 1 1 1 1 1 1 1 1 I 1 1 1 1 1 


1 

1 
1 1 



word 
word 1 
word 2 



Task Name A three character (.SIXBT) mnemonic for the task to 
which the error information applies. 

DEVERR Device error code for device associated with this 
task 

SPLERR Spooler error- code for this task. 

The mnemonics for the tasks and the order in which the blocks for the 
various tasks appear are as follows: 



MNEMONIC 
EST 
ESD 
DKU 
DTU 
LPU 
CDU 
GRU 
ESP 
LVU 



TASKS 
"Stop Task" task 
Software directive task 
RK (Cartridge) disk driver 
DECTAPE driver 
Line Printer driver 
Card reader driver 
XY (Plotter) driver 
Spooler 

LVll printer/plotter driver 
spare — no mnemonic 
spare — no mnemonic 
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RESTRICTIONS: none 

Returned REV values: 

1 Successful completion 

-300 Invalid ALV value. Information has been returned. 



3.6.5 Spooler Status Report Directive 

The spooler status report software directive returns information 
regarding spooler status and devices present in PIREX. The format 
of the task control block for the spooler status report software 
directive is as follows: 



word 
word 1 
word 2 
word 3 
word 4 
word 5 
word 6 
word 7 



,15 




8,7 




0. 


1 1 1 


ATA 
1 1 1 


1 1 1 1 1 


ALV 
1 1 1 1 


1 


1 1 1 


FCN 
1 1 1 


1 1 1 1 1 


201 
1 1 1 1 


1 


; REV 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 t 


1 


• 1 1 


004 
1 1 1 


1 

I unused 
1 1 1 1 1 1 1 1 • 




; spoLsw 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


1 


; DEVARE 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 




; DEVSPL 

1 1 1 1 1 1 1 1 1 1 1 1 r 1 1 


1 


1 SPUNIT J 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 



SPOLSW, SPUNIT, DEVARE, and DEVSPL are four locations (within PIREX) 
in which information is kept concerning spooler status and which de- 
vices have been assembled into PIREX. The spooler status report 
software directive merely copies the contents of SPOLSW, SPUNIT, 
DEVARE, and DEVSPL into the task control block. Three of these 
words consist of a number of one-bit flags. If the bit is set (1) 
the corresponding condition is asserted: the device driver is 
present, spoolable, or busy; the activity is enabled, Tf the bit 
is clear (0) the opposite condition applies: the device driver is 
absent, non-spoolable, or idle, the activity is disabled. The ex- 
act format of these three words is as follows: 



SPOLSW: 



15 



8.7 



unused 



1* if 



LP busy 
CD busy 
XY busy 
despooling enabled 
spooling enabled 
both spooling and despooling enabled 
spooler connected to PIREX 
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DEVARE ; 
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15 8J 0, 



t •¥ 



'^ 



unused 
I I I I I I I t I t t 



XY driver present 
CD driver present 
LP driver present 
RK driver present 



DEVSPL: 



15 



8,7 



* * * 



^ 



unused 
' « t I I I I I I I I 



XY spoolable 
CD spoolable 
LP spoolable 
unused 

SPUNIT is the RK unit onto which the spooler is currently (or was pre- 
viously) spooling data. 

RESTRICTIONS: 

1. DEVSPL and SPOLSW contain zero until after the first request 
has been issued to the spooler. 

Returned REV value : 

1 Successful completion 
-300 Invalid ALV value. Information has been returned. 

3.6.6 PIREX MOVE Directive 

The PIREX MOVE directive moves information from one place in the PDP-11 's 
address space to another place in its address space. (The address space 
is composed of both Local-11 and Common Memory.) The format of the task 
control block for the PIREX MOVE directive is as follows: 



From Location 
To Location 
Words To Move 



15 8 7 


I ATA ; ALV 

• • I I 1 1 1 1 1 1 1 1 1 1 ,, , 


FLN ; 201 ; 

' I 1 1 1 1 1 1 1 1 1 1 1 1 ,, , 


! REV ; 
■ I ) 1 1 1 1 1 1 1 1 1 1 1 1 , 1 


i 005 \ ; 
■ >> 1 1 I 1 1 1 1 1 1 1 1 1 1 , 


; FROM LOCATION • 
■ < ■ * • 1 1 1 1 1 1 1 1 1 1 1 1 


! TO LOCATION j 
' ' ■ > ■ 1 > 1 1 1 1 1 1 1 1 1 1 


I WORDS TO MOVE • 
■ 1 1 1 I 1 1 1 1 1 1 1 1 1 1 , ,' 



word 

word 1 

word 2 

word 3 

word 4 

word 5 

word 6 

PDP-11 byte address of beginning of information to be 
moved . 

PDP-11 byte address of a new starting location for 
information. 

The number of words to move. 



NOTE 1. This directive commonly is used to transfer information 
between common and local memory 
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CHAPTER 4 
TASK DEVELOPMENT 



4 . 1 INTRODUCTION 

This chapter discusses in detail the procedure for developing a task 
and for installing it into the PIREX software system. The development 
of tasks in the UC15 system normally begins by the determination of 
the function to be performed by the task. Once the basic function of 
the task has been determined and designed, the user can integrate it 
into the UC15 system. The following summary describes the steps nec- 
essary to accomplish this: 

1. Determine the priority level at which the task will execute. 

2 Design one or more appropriate TCB formats 

3. Assign a Task Code Number to the task 

4. Enter appropriate information into the various PIREX lists 
and tables. 

5. Design and code the requesting program. This is the program 
which issues requests to the task. 

6. Design and code the task. 

7. Assemble all programs and test. 

The remaining sections describe these steps in detail. 



4.2 PRIORITY LEVEL DETERMINATION 

The selection of a priority level for a newly developed task must be 
based upon its function. If the task is a device driver, a device 
priority should be selected. If the task is a data manipulation rou- 
tine, a background priority should be chosen. 
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4.2.1 Device Priorities 

The device priorities are 7 (highest) through 4 (lowest) 

• Priority 7 must be reserved for certain PIREX routines and 
should not be used as a task priority. (Certain short 
instructions sequences require priority level 7 protection 
but a general use of priority 7 must be avoided.) 

• Priority 6 should be used only if interaction with the CRll 
Card Reader can be avoided. If the CRll is in use, excessive 
lOPSUC CDU 74 errors (card column lost) will occur if this 
level is used by another task executing in parallel. 

• Priorities 4 and 5 can be used in an unrestricted manner. 

There are three types of priorities to consider when selecting the 
priority of a device driver. 

1. The actual device hardware priority N 

2. The priority stored in the trap vector for the device (its 
new PS) must be priority 7 to allow an uninterrupted context 
switch. 

3. The priority at which the task will execute after the context 
switch (R.SAVE) . This should be N (the above constraints 
must be considered before deciding that it will be N) . This 
priority is set in the LEVEL table (see Section 3.3.6). 



4.2.2 Background Task Priorities 

The standard UC15 PDP-11/05 computer does not differentiate between 
the software priorities through 3. All software priorities are 
interruptable by any device operating at any device priority. These 
software priorities, while treated by the hardware as the same, are 
not treated by PIREX as identical. The background task's position in 
the Active Task List (the list to schedule the next task to run) is 
based upon its priority (as indicated in the LEVEL Table) . Thus a 
priority 2 task is always selected for execution before a priority 1 
task. 

It should always be remembered that the ATL is built dynamically and 
is composed of only active tasks. Thus a task's actual ability to 
execute depends both on its priority and on what other tasks of equal 
or greater priority are actually available to execute (active) . Tasks 
of the same priority are run on a first come-first serve basis. 



4.3 TCB FORMAT AND LOCATION 

The design of new Task Control Blocks (TCBs) must be governed by sev- 
eral constraints: 

1. Certain "fixed" items of information must be present. 

2. There may be a size constraint depending upon source of the 
TCB. 

3. TCBs issued by the PDP-15 have a location constraint. 
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The first three TCB words have a fixed format (see Section 3.2.5). 
The remainder of the TCB should be as follows: 

1. Control words should be allocated to fixed pre-defined loca- 
tions. 

2. Data words should be blocked into the location following the 
control words. 

3. The TCB size should be kept constant for ease of core allo- 
cation. 

Location and size constraints are interrelated: 

1. If the TCB is for a task executing under PIREX in PDP-11 
Local Memory, there is no location constraint. The TCB size 
must be kept small enough so that the TCB does not overflow 
into common memory. 

2. If the TCB is for a PDP-11 task executing in Common Memory, 
it must be positioned so that it is : 

a. present entirely in Common memory (not PDP-15 Local 
Memory , and 

b. not overlaying any of the PDP-15 monitor resident code. 

These constraints actually apply to any PDP-11 Code or data 
located beyond PDP-11 Local Memory. 

3. If the TCB is for an RSX-PLUS III routine, it must be located 
in a task partition or common area that is within the Common 
Memory . 

4. Since the specification of absolute core location is difficult 
in DOS-15, the TCB placement problem is somewhat more complex. 
The standard DOS-15 system has seven TCBs assembled into the 
resident monitor. These include TCBs for RK Disk, XYll Plot- 
ter, CRll Card Reader and LPll/LVll/LSll Printer. In addi- 
tion there are three spare TCBs of various sizes. The user 
developing his own UNICHANNEL handler should take advantage 

of these spare TCBs. .SCOM + 100 (location 2008 in PDP-15 
memory) points to a table of pointers to each of these TCBs. 
The user should select the one closest to his size requirement. 
(See the DOS Systems Manual , DEC-15-0DFFA-B-D) . 



4.4 TASK CODE NUMBER DETERMINATION 

Task code numbers are composed of two fields. Bits 6 through are 
used to contain the actual task code number. This is the number used 
when searching tables and lists ordered by TCN. In the DEC-supplied 
system, these numbers range from through 138* Bit 7 is used in TCBs 
to determine if the task is spooled. If bit 7=1, the task is not 
spooled. If bit 7=0, the TCBs for the task are routed to the spooler 
if the spooler is enabled. (There must then be a spooler module pre- 
pared to handle TCBs for that particular task (see Chapter 5) ) . 

Task codes 11, 12, and 13 are spare task codes in the DEC-supplied 
system. They are used in increasing order. The highest task code 
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position must not be used for a permanent task because MACll requires 
this slot for its use as a temporary task (a task that is connected 
and disconnected at run time.) 



4.5 UPDATING LISTS AND TABLES 

The installation of a new task requires placing entries into the vari- 
ous tables and lists. There are two cases: 

1. the installation of a new task into a current spare task 
entry 

2. the installation of a new task into a new entry (by expanding 
the tables) 

For each of these two cases there are two types of task entries: 

1. permanent tasks 

2 . temporary tasks 

A permanent task is one that is assembled into the PIREX binary. Its 
actual starting address and priority level are known. 

A temporary task is one that is dynamically connected to and discon- 
nected from PIREX. Its starting address is dependent upon its place- 
ment in memory. (Temporary tasks must be written in Position Inde- 
pendent Code — see MACll Assembler Programmers Reference Manual DEC- 
15-LMCMA-A-D) . 

Chapter 3 describes the format of each table entry. - 



4.5.1 Temporary Task Installation — Existing Spare Entry 

To install a Temporary Task into an Existing unused Task Entry, TCN 
lie, 123, or 138 f simply use the CONNECT and DISCONNECT directives. 
No new table space and no new table entries are required. 



4.5.2 Permanent Task Installation — Existing Spare Entry 

To install a Permanent Task into an Existing unused Task Entry, TCN 11 
or 12 perform the following: 

1. Update the LEVEL table entry for that TCN with the task's 
priority (see Section 3.3.6). 

2. Update the TEVADD Table entry for that TCN with the task's 
starting address (see Section 3.3.7). 



4.5.3 Temporary Task - New Entry 

To install a Temporary Task into a new Temporary Task Entry (i.e., to 
expand the table to accommodate a new Temporary Task) perform the 
following: 
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1. Add an entry to the ATLNP Table (see Section 3.3.1.2). 

2. Add an entry to the LISTHD Table (see Section 3.3.3). 

3. Add an entry to the LEVEL Table (use ".BYTE 0" as the priority 
value since this is a Temporary Task Entry and the actual 
task priority will be filled in by the connect directive) . 

4. Add an entry to the DEVST Table (see Section 3.3.5).-'- 

5. Add an entry to the CLTABL (see Section 3.3.4). 

6. Add an entry to the TEVADD Table (use ".WORD 0" as the entry, 
since this is a Temporary Task entry that will be filled in 
by the CONNECT directive) . 

7. Add an entry in the SENDll Table (see Section 3.3.8). 



4.5.4 Permanent Task Installation — New Entry 

For a new Permanent Task, repeat the procedure in paragraph 4.5.3, for 
a new Temporary Task, with the following changes: 

1. Step 3 is changed to: Place the task's priority in the new 
LEVEL Table entry (See Section 3.3.6). 

2. Step 6 is changed to: Place the task's starting address in 
the new TEVADD entry (see Section 3.3.7). 



4.6 CONSTRUCTING DEVICE HANDLERS 

This section describes how to construct device handlers for DOS-15 and 
RSX-PLUS III. Additional information on construction of a PDP-11 
requesting task is provided. 



4.6.1 Constructing a DOS UNICHANNEL Device Handler 

The following description of how to construct a handler for the DOS-15 
monitor does not discuss those topics related to all DOS-15 handlers 
both traditional and UNICHANNEL. General issues pertaining to all 
DOS-15 device handlers can be found in the DOS Systems Manual (DEC-15- 
ODFFA-B-D) . The DOS-15 V3A000 UNICHANNEL Line Printer handler is usea 
as a descriptive example (see Figure 4-1) . Several constants should 
be defined in a UNICHANNEL handler source file before the executable 
code (see Figure 4-1, lines 49-54, 72-75). These constants include: 



(1) PIREX transfers, upon request, the entire DEVST Table to the 
PDP-15 monitor. The DOS resident monitor can accommodate a maximum of 
5 additional DEVST entries beyond the current 13g. Expansion beyond 
208 entries would require reassembly of the DOS-15 resident monitor. 
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PACE 

28 
29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

49 

40 

47 

48 

49 

90 

91 

92 

93 

94 

99 

96 

57 

98 

99 

60 

61 

62 

63 

64 

69 

66 

67 

68 

69 

70 

71 

72 

73 

74 

79 

76 

77 

78 

79 

80 

81 

82 

83 

84 

89 

86 

87 

88 

89 

90 

01 

92 

93 

94 

99 

9e 

97 

98 

99 

100 

101 

102 

103 

104 

105 

106 

107 

108' 

109 

110 

111 

112 

113 

114 

119 

116 

117 

118 

119 

120 



LPU. 



320 



9vimss » 

706141 1 

7PSltl'l * 

706144 * 

0ia0PI03 A 

440000 A 

4400190 A 

000137 A 

000001 A 



000072 A 



000004 A 



R 040927 R 

00001 R 040933 R 

00002 R 440930 R 



00003 R 600936 R 



00004 
00009 
00006 
00007 
00010 

00011 

00012 

000X3 

00014 
00019 
00016 
00017 
00020 
00021 
00022 
00023 
00024 
00029 



00026 
00027 
00030 
00031 
00032 
00033 
00034 
00039 



220930 
440930 
900022 
340623 
040011 
740040 
600100 
741000 
600024 
440930 
600129 
600494 
600129 
600024 
600127 
600474 
760006 
600070 



60003S 
04(1595 
200026 
040596 
200624 
04(1(1126 
200925 
600042 



00036 R 040559 R 

00037 R 220626 R 



lPUU edit 020 NOV. 29, 73 

/COPVRTGhT 1972, 73 OIGITAU EQUIPMENT CORP., »<AYnaHU, MASS. 

/J.M. wOlFBERG CS. ROOT) 

/UPU."If)PS LINE PRINTER HANDLER FOR LPU UInE PkinTFH 

/CALLING sequence: 

/ CAL ♦ .OAT SLOT £9-17) 

/ FUNCTION 

/ N ARGS, WHERE N IS 4 FUNCTION OF "FUNCTION" 

/ NORMAL RETURN 

/ens 12-13 OF ,scbM+4 indicate printer. 

/ 00« UNDEFINED. 

/ 0l« 80 COLUMNS. 

/ {0» 120 COLUMNS. 

/ U" 132 COLUMNS. 

/ASSEMBLY Parameters: 

/ NOFFbI INHIBITS automatic ENO OF PAGE FORM FEED 

FFrNT CAN BE DEFINED AS NUMBER OF LINES PER PAGE IF NOFF UNDEF, 

"EPInE FFCNT in nOCTALM 

IF FFCNT AND NOFF BOTH UNDEF., 58 LINES PER PAGE IS DEFAULT. 

NOSPl PRODUCES A VERSION THAT CANT BE SPOOLED EVEN IF 

LP SPOOLING IS ENABLED. 



/ 

/ 

/ 

/ 

/ 

/ 

aPILVL»2 

aPISLT»56 

/ 

LSSF»APIlVL*20*706101 

SlOAa7'>S001 

LlORs7("6006 

CAPI«APIlVL*20*706104 

/ 

.SCOM«]0;i 

.MEO-3 

I0X.TS7 

SET»ISZ 

E)(ERRSa.SC0M'»37 

00S»1 

/ 

'.IFUND FFCNT 
F0RMSa72 

'.ENOC 

'.ipdef ffcnt 
forms»ffcnt 

,CNDC 

.IFUNO NOSPL 
DEVC00»4 

'.ENDC 

.IFOEF NOSPL 
0EycaDa2e4 

lENDC 

.GCOBL LPA. 

'.TITLE CAL ENTRANCE 
lPa. dac LPCALP 
nAC LPARGP 
lOX LPARGP 



/UC15 LP API PRIORITY 
/UC15 LP API TRAP VECTOR 

/UCl5 LP SKIP 

/SKIP ON DATA ACCEPTED 8Y THE PDPll 

/CLEAR "DONE" FLAG AND LOAD REG FOR 

/ THE PDPH. 

/CLEAR FLAG 



/USED TO SET SWITCHES TO nqn-Zero. 



/CODE FOR LP DRIVER IN PIREX 
/SAME DRIVER, DISABLE SPOOLING) 



/SAVE CAL POINTER. 

/AND ARGUMENT POINTER. 

/POINTS TO WORD 2 - FUNCTION CODE. 



/ FIRST TIME THRU GO CAL INIT. COOE IN LBF 
/ 

JMP INIT 



NEM 
/ 
/ 
/ 



lTabl 



/FIRST TIME THRU 00 SETUP CAL 

/AND SET-UP TCB AND BUFFER, OVERWRITE 

/JUMP WITH NO-OP 



LPERSie 



LAC* 

IDX 

AND 

TAD 

D*C 

XX 

JMP 

SKP 

JMP 

IDX 

JWP 

JHP 

JMP 

JMP 

JMP 

JMP 

LAW 



LPARGP 
LPARGP 
C17777 

CJMP LTABL-1 
.♦I 

LPIN 



/POINTS TO WORD 3 - BUFFER ADDRESS. 
/STRIP OFF UNIT NUMBER. 
/DISPATCH TO PROCESS FUNCTION. 



LPER06 

LPARGP 

LPNEXT 

LPCLQ3 

LPNEXT 

LPER06 

LPMRIT 

LPWAIT 

6 

JMP SETERR 
.TITLE INTERRUPT SERVICE 



/I - .INIT 

/2 - .FSTAT,.RENAM,.DLETE - IGNORE 

/3 - .SEEK - ERROR 

/4 - .ENTER - IGNORE 

/5 - .CLEAR - IGNORE 

/e - .CLOSE 

/7 - .MTAPE - IGNORE. 

/IB - .READ - ERROR. 

/U - .WRITE 

/12 - .WAIT OR .WAITR 

/ILLEGAL HANDLER FUNCTION. 



/LPU. INTERRUPT SERVICE 

LPINT .JMP LPPIC /PIC ENTRY, JUMP TO COOE 
LPAC /SAVE INTERRUPTED AC 
LPINT /GET INTERRUPTED PC 
LPOUT /SAVE FOR COMMON EXIT 
CJMP LPPIC /RESTORE PIC ENTRY 
LPINT 



/ 

lppic 



DAC 
LAC 
DAC 
LAC 
PlAC 
LAC 
JMP 



ftAC 
LAC* 



CNOP /WE DON'T NEED ION IN COMMON EXIT 

LPICM /JOIN COMMON CODE 

LPAC /PIC CODE, SAV AC 

(0 /GET INTERRUPTED PC 



Figure 4-1 
PDP-15 LPll DOS Handler 
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121 
122 
123 
124 
129 
126 
127 
128 
129 
190 
131 
132 
193 
194 
19S 
136 
137 
138 
139 
140 
141 
142 
143 
144 
14S 
146 
147 
148 
149 
190 
191 
192 
193 
194 
199 
196 
197 
198 
199 

ise 

161 
162 
163 
164 
165 
166 
167 
168 
169 
170 
171 
172 
173 
174 
175 
176 
177 
178 
179 
180 
181 
182 
189 
184 
189 
186 
187 
188 

189 

190 

191 

192 

193 

194 

199 

196 

197 

198 

199 

200 

201 

202 

203 

204 

209 

206 

207 

208 

209 

210 

211 

212 

213 

214 

219 

216 



00040 
00041 
00042 
00043 
00044 
00049 
00046 
00047 
00090 
00051 
00092 
00093 
00054 



040556 
200827 
040052 
70S144 
220542 
742010 
743120 
600055 
140533 
200555 
740040 
703344 
620556 



00095 fi 500630 f> 

00096 R 940631 " 

00097 R 600062 

00060 R 340832 R 

00061 R 600070 R 



00062 
00063 
00064 
00069 
00066 
00067 



00070 
00071 
00072 
00073 
00074 
00079 
00076 
00077 



200937 
160942 
706091 
600064 
706006 
600051 



040077 
740000 
200077 
120633 
600071 
777777 
142025 
000000 



00100 
001D1 
00102 

00103 

00104 
0iaie5 

00106 

00107 
00110 
00111 
00112 
0i«113 
00114 

00115 
00116 
00117 
00120 
00121 
00122 
00123 



440590 
200544 

0605315 

44053a 

200531 
040532 
220527 
500634 
340535 
540535 
741000 
200625 
040534 

100443 
100512 
140551 
75003i3 
060540 
723013 
060541 



00124 H 100517 R 



00125 R 703344 * 

00126 R 62053«J R 



00127 
00130 
00131 
00132 
00133 
00134 
00135 
00136 
00137 
00140 



100512 
220527 
500639 
240636 
040594 
220930 
440530 
040550 
723002 
040597 



00141 R 777000 * 

00142 R 920590 R 

00143 R 742030 * 



lPicm 



lpirt 
lpirti 

LPISh 



/ 

f 

lpierr 



/ 
I 
f 

RETRY 



/ 
/ 

t 

SETCRR 

EROUT 



ERRNUM 

/ 

/.INTT 

/ 

1.PIN 



/N0RM4I. 
/ 

lPnext 



/ 

/.WRTTF 
/ 

lPwrit 



L*C 

n*c 

C*PI 
L*C* 
RTL 
«P*1RTR 

JMP 

r>ZM 
L*C 
HLT 
OBR 
JMP* 



LPOUT 

CION 

UPISW 

LPEV 



LPIERR 

LPUND 

LPAC 



LPOUT 



/SAVE 

/NEED INTERRUPT ON INST. IN CUMMONi CODE 

/CLEAR Flag, now in commqm code 

/EVENT VARIABLE FROf* PIREX 
/POP-U (MINUS) SIT TO OUR AC0 
/♦ IS OK 
/ERROR, GO LOOK 
/CLEAR UNDERWAY FLAG 
/RESTORE AC 
/ION OR NOP 



AND 
SAD 
JMP 
TAD 
JMP 



LAC 

nZM* 

SIOA 
JMP 
LIOR 
JMP 



(177777 /KEEP REAL 16 BITS FROM POP-ll 
£177001 /CODE FROH OUT OF NODES IN PIREX 
RETRY /JUST TRY AGAIN, LEAVING lPUND SET 
(600000 /MAKE > NUM8ER FOR IQPS 
SETERR /TREAT AS REGULAR lOPS ERROR 

/NOTE THAT THIS SHOULDN'T HAPPER. 



LPTCB 
LPEV 



LPIRTI 



/TCB ADDRESS 

/CLEAR EVENT VARIABLE 



/THIS SENDS THE TCB ADDR. TO THE PDP-11 
/EXIT FROM INTERRUPT 



'.TITLE ERROR ROUTINE 

nAC ERRNUH 

NOP 

LAC ERRNUM 

JMS* (EXERRS 

JHP ERLOOP 

LA»I -1 

'.SIXBT 'LPU' 



.TITLE .INIT FUNCTION 



/'JmP LPTRY' if IOPS 4 ERROR. 



/HOLDS ERROR NUMBER FOR REPEAT. 



TDX lpargp 
LAC 8UFSIZ 
nAC* LPARGP 
IDX LPaRGP 



LAC 

nAC 

LAC* 

AND 

TAD 

SAD 

SKP 

LAC 

n*C 



PAGSIZ 
PAGCNT 

lpcalp 

(4000 

FFFF 

FFFF 

(NOP 
FFSW 



.IMS RESETL 

.TMS L''IOCK 

nZH COP 

CLAJIAC 

OAC* LPBUF 



AAC 

nAC* 

.IFUND 

.IMS 

'.ENDC 

CAL EXIT 



13 

LPBUFO 
NOFF 
LPSET 



/36(10) FOR aa COLS; 56(li)) FOR 132 COLS 
/RETURN TO USER. 
/NOW POINTS TO RETUKM, 
/LF COUNTER 

/DOES TNTT INHIBIT AUTO FQRmS FEEH 

/THIS is'iNHiBiir'aiT" ' 

/FFFF ASSEHilLED AS NOP FOR NOFF, ISZ IF NOT 

/SKIP IF INIT INHIBITS FF 

/INIT OOESNiT INHIBIT, USE ASSE!iBLEn VALUE 

/INIT INHIBITS IT, USE NOP 

/THIS SWITCH XCT'EO BY FORMS CONTROL 

/SECTION IN PUTCH SUBROUTINE 

/RESET Tab ANO line WIOTri CIJUNTERS 

/CHECK LP BUSY 

/SAY A FF OCCURREO 

/COUNT OF ONE BYTE FOR HEADER 

/HEADER 

/FORM FEED 

/FOR BUFFER 

/DO ONLY IF NOFF NOT (DEFINED 

/THIS SENDS REQ. TO POP-U 



DBR 

,rMP* LPARGP 

'.TITLE .WRITE FUNCTION 



JMS LPIOCK 
LAC* LPCALP 
AND (1000 
XOR (SKP 
OAC MIX 
LAC* LPARGP 
IDX LPARGP 
nAC TCHAR 
AAC 2 
nAC X12 



/PRINTER BUSY? 

/GET THE DATA MODE FROM THE USER CAL. 
/MAKE SKP-NOP IN MIX 



/USER BUFFER ADDRESS. 
/NOh POINTS TO WORD COUNT 
/SAVE POINTER TO BUFFER HEADER 
/HAKE X12 POINT TO DATA NOT HEADER 
/GETTER POINTER 



/ SPT- U 
/ FOR B 
/ 



P LIMIT OF INPUT BUFFER SIZE TO PREVENT DATA OVERRUN 
fjTH IOPS ASCII ANO IMAGE ASCII 



LAnl 

AND* 

SMHA 



17000 
TCHAR 



/GET PAIR COUNT FROM LEFT HALF 

/BRING TO RIGHT. PAIR COUNT INCLUDES HEADER 
/PAIR COUNT. WE ISZ BEFORE LOOP SO THAT'S 



Figure 4-1 
PDP-15 LPll DOS Handler (cont.) 
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217 
218 
219 
220 
221 
222 
223 
224 
229 
226 
227 
228 

229 

230 

231 

232 

233 

234 

239 

236 

237 

238 

239 

240 

241 

242 

243 

244 

249 

246 

247 

248 

249 

290 

291 

292 

293 

294 

299 

296 

297 

298 

299 

260 

261 

262 

263 

264 

269 

266 

267 

268 

269 

270 

271 

272 

273 

274 

279 

276 

277 

278 

279 

280 

281 

282 

283 

284 

289 

286 

287 

288 

289 

290 

291 

292 

293 

294 

299 

296 

297 

298 

299 

390 

301 

302 

303 

304 

309 

306 

307 

308 

309 

310 

311 



0?ll44 R 4190994 R 

00149 R 79l(llil * 

00146 R 7415131 * 

00147 H 38B930 R 



00150 
00151 
00152 
1^0193 
00194 
00199 
00196 
00197 
00160 
00161 
00162 
00163 
00164 



04(1943 
44|»S30 
200941 
040560 
200339 
040932 
200431 
040427 
790000 
400994 
230637 
060540 
750001 



)169 R 060541 R 



XCT 

SKP1CL*J 

SKPJCHAl 

T*D* 

n*c 

TSZ 

L*C 
0*C 
L*C 

n*c 

L»C 

n»c 
cu* 

XCT 
U*C 

n*C« 

nAC* 



HIX 
CMA 
lAC 
UP4RGP 

TEMPI 

LPARGP 

LPBUFO 

PUTP 

GETIN 

GETSW 

PUTIN 

PUTSW 

MIX 

(400 

LPBUF 



LPaUFD 



/OK, I0P9 NOW SET XCPT CH»JI*C 

/SKIP IF ASCII, NOT IF IrtAGfc 

/IMAGE -1 IN AC, SKIP. -1 BECAUSE WF ISZ FIRST 

/lOPS COMPLEMENTED TO CORRECT VALUE 

/IMiGE ADO IN TOTAL WORD COUNT, INCL 

/TWO WORDS FOR HEADER. WE IS7 BEFORE LOOP. 

/INTO CONTROLLER, BOTH MOOES 

/MOVE ARG POINTER TO EXIT 

/POINTER TO DATA PORTION OF RuFFEH 

/LOAD TO CHARACTER PUTTER POINTER 

/INIT, CHAR GETTER 

/INIT CHAR PUTTER 

/INIT OUTPUT BUFFER HEADER 
/TO IF lOPS, 403 FOR IM»GE 



/COUNT OF 1 BLANK AS DEFUALT 
/FOR ZERO LENGTH lOPS LINE 
/IN FIRST DATA CHAR 



00166 
00167 
00170 
00171 
00172 
00173 
00174 
00175 
00176 
00177 
00200 



100320 
741200 
600166 
54(1)640 
600186 
040550 
723740 
741300 
600235 
54^641 
60^302 



/ MiT* 
/ 

MAIN 



00201 R 200547 R 

00202 R 740100 A 

00203 R 600205 R 

00204 R 200642 R 

00205 R 100366 R 

00206 >< 750030 A 

00207 R 040951 P 

00210 R 200552 P 



LAC 


FIRST 


SMA 




.IMP 


.*3 


LAC 


tl2 


,THS 


PUTCH 


rLAlIAC 




DAC 


COP 











/ 

/ 


NOTF 


BLANKC 


HAS MINL 










/ 
/ 

/ 


SINfE POP-U 


CONTROL 


00211 


R 


744100 


A 




SMAJCLL 




00212 


A 


600223 


R 




.IMP 


MAINC 


00213 


R 


340643 


R 


/ 




TAD 


£2BB 


00214 


R 


790100 


A 




SMAICLA 




00215 


R 


600221 


R 






JMP 


MAIND 


00216 


R 


340643 


R 






TAO 


(200 


00217 


R 


100366 


R 






,tMS 


PUTCH 


00220 


R 


200643 


R 






LAC 


C200 


00221 


R 


340992 


R 


HAiNn 


TAO 


BLANKC 


00222' 


R 


100366 


R 






JMS 


PUTCH 


00223 


R 


140992 


R 


MAINC 


nZM 


BLANKC 


00224 


R 


200990 


R 






LAC 


TCHAR 


00225 


R 


100366 


R 






jMS 


PUTCH 


00228 


R 


440553 


R 


haink 


ISZ 


TABC 


-^MAAa 






n 






• ••p 


ullTUC 


VOt.t.1 




OV1|9CO£ 












00230 


R 


777770 


A 






LAW 


-10"" 


00231 


R 


040593 


R 






DAC 


TABC 


00232 


R 


440949 


R 


MAINE 


TSZ 


MAXC 


00233 


R 


600166 


R 






.TMP 


MAIN 


00234 


R 


600302 


R 


/ 

/ 




JMP 


UCLP03 










SPECIAL CHARACTERS 


00235 


R 


790201 




mSPEC 


SZAtCLAlCMA 


00236 


R 


600242 








.IMP 


HSPEC2 


00237 


R 


340992 








TAD 


BLANKC 


00240 


R 


040952 








DAC 


BLANKC 


00241 


R 


600226 








.IMP 


HAINK 


00242 


R 


200550 




M8PEC2 


LAC 


TCHAR 


00243 


R 


540644 








SAD 


Cll 


00244 


R 


600266 








JMP 


MTAB 


00249 


R 


940649 








SAO 


(19 


00246 


R 


600302 








JMP 


UCLP03 


00247 


R 


540649 








SAD 


C2e 


00290 


R 


600263 


R 






JMP 


MCR 


00291 


R 


940647 


R 






!tAD 


£14 


00292 


R 


600296 


R 






JMP 


MSPEC3 


00253 


R 


940690 


P 






SAD 


C21 


00294 


R 


600260 


R 






JMP 


HSPEC4 



LOOP To TRANSFER CHAR'S TO HANDLER PUFFER 

IMS GETCH /CHARACTER GETTER, LEAVES IT IN AC 

'%Hk /SKIP UNLESS NULL CHAR 

JMP MAIN /NULL, IGNORE 

SAD C177 /IGNORE RUB-OUT 

JHP MAIN /MAIN 

nAC TCHAR /SAVE CHAR THROUGH TESTING 

4AC -40 /SEPARATE 'TEXT' ChsR'S FROM CCmTCOL CHAR'S 

SNAISPA /SKIP ON REGULAR CHARS 

JMP HSPEC /GO no SPECIALS 

SAD £135 /ALT MODF 

JHP UCLP03 /£NP OF LINE ON ALT MODE 

THE LOGIC AT PUTCH TO DO FORMS CONTROL DOESN'T OU IMPLIEn 
LINF FEEDS, I.E. THOSE LINES HAVING NO LEADING CONTROL CHAR. 
XP MUST FAKE IT OUT BY PLACING A LINE FEED ON SUCH LINESI 

/DO ONlT if FIRST CHAR OF LINE IS REGULAR 

/SKIP IF FIRST CHAR 

/NOT FIRST CHAR, JUST CONTINUE 

/HERE IS LINE FEED 

/AND CALL TO DO FORhS CONTROL 

/SET FLAG SAYING A PEAL CHAR SINCE i FF 

LAC BLANKC /OO WE HAVE PENDING BLANKS/TAHS TO SEND 

i COUNT OF CONSECTIVE BLAnkS/TABS 
.ER PRINTS ONLY PLANKS 

/SKIP IF ANY COLLECTED, TO PUT OUT fltFORE 

/ff E k\ CH A A ' S 

/NONE, PENDING, GO PUT OUT THE CHAR 

/TOUGH, IF MORE THAN 127 COLLECTED, MUST 

/PUT OUT TWO COUNTS 

/SKIP IF NEED TWO COUNTS 

/NO, JUST PUT OUT COLLECTED COUNT 

/TWO COUNTS, MERE IS FIRST 

/SET UP TO 00 SECOND 

/COMMON CODE, LAST COUNT FOR EITHER CASE 

/CLEAR OUT BLANK COUNTER 

/GET BACK ORIGINAL CHAR 

/TO OUTPUT BUFFER 

/INCREMENT TAB COUNTER 

^iMQT nuEDfi_nM. CQ CHECK LI'"E COUNTFR 

/RESETTAB'cbuNTER" 

/HAVE WE RUN OUT OF LINE 

/NO 

/YES, GO FINISH UP, WITH END OF LINE 



/SKIP IF IT IS A BLANK 

/NOPE, CHECK FOR OTHER THINGS 

/ADO ONE TO BLANK COUNTER CIS MINUS COUNTER) 

/JOIN LINE AND TAB CONTROL SECTION 

/GET BACK ORIGINAL CHAR 

/IS IT A TAB 

/YUP, GO DO IT 

/CARRIAGE RETURN 

/END OF LINE ON CARRIAGE RETURN 

/FORTRAN OTS OVERPRINT, 00 AS CR 

/FORM FEED 

/JUST PUT IT OUT, FOR NOW 
/FORTRAN DOUBLE SPACE 
/DO AS TWO 12'S 



Figure 4-1 
PDP-15 LPll DOS Handler (cont.) 
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312 

313 

314 

315 

31S 

317 

318 

319 

320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 

335 

339 

337 

338 

339 

340 

34i 

342 

343 

344 

349 

346 

347 

348 

349 

390 

391 

392 

393 

394 

399 

396 

397 

398 

399 

360 

361 

362 

363 

364 

369 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 

379 

380 

381 

382 

383 

384 

385 

386 

387 

388 

389 

390 

391 

392 

393 

394 

399 

396 

397 

398 

399 

400 

401 

402 

403 

404 

409 

406 

407 



00255 
00256 
00257 
00260 
03261 
00262 
00263 
00264 
00265 
00266 
00267 
00270 
00271 
00272 
00273 
00274 
00275 
00276 
00277 
00300 
00301 

00302 
00303 
00304 
00305 
00306 
00307 
00310 
003U 
00312 
00313 
00314 
00315 



200642 
100356 
600166 
200842 
100366 
600255 
100443 
200645 
600256 
200553 
340552 
040552 
200553 
740031 
340946 
04(9546 
74{1100 
600302 
777770 
040553 
600166 

200645 
400554 
100366 
100443 
440551 
220540 
500651 
7402013 
600316 
400554 
600125 
460540 



00316 R 100517 R 

00317 H 600125 R 



00320 R 0000^13 A 

00321 R 40(11554 R 

00322 R 741(900 i 

00323 « 62H332 R 



00324 
00325 
00326 
00327 
00330 
00331 



440543 
741000 
600306 
220557 
440557 
600333 



00332" R 000000 » 



00333 R 500640 R 

00334 R 620320 R 



00335 H 000337 R 



00336 R 100332 R 



00337 

00340 
00341 
00342 
00343 
00344 
00345 
00346 
00347 
00350 
00391 
00352 
00353 
00394 
00399 
0039S 
00357 
00300 
00361 
00362 



440543 
600343 
100443 
600306 
220957 
440557 
692000 
640607 
100332 
640607 
100332 
640604 
040332 
220997 
440997 
692000 
200332 
640603 
100332 
640807 



«SPEC5 L*C 

MSPEC3 JMS 

JMP 

MSPEC4 L*C 

•IMS 



mCR 
HTtB 



JMP 
JMS 
I AC 
.?MP 
L*C 
T*D 

n*C 
L*C 

CM*JIAC 

TAD 

DAC 

S^A 

,IMP 

LAW 

DAC 

.TMP 



(12 /DEFAULT ON UNRECOGMZED CONTROL CH*R. IS LINE PEED 

PUTCH /PLACE In BUFFER 

MAIN /GO DO NEXT 

C12 /FIRST OF Two IJIS FOR THE 21 

PUTCH 

MSPEC5 /GO no THE SECOND 112 

RESETL /NEW LINE, RESET VARIOUS GUYS 

CIS /CARRIAGE RETURN 

MSPEC3 /PUT CHAR AND LOOP 

TABC ./GET REMAINING COUNT FOR TAB 

BLANKC /AND ADD TO CUMULATIVE BLANK COUNT 

BLANKC 

TABC /AND TO LINE CHECKER 

MAXC 
MAXC 

/SKIP IF SOME LINE LEFT 

UCLP03 /NONE LEFT, FINISH UP LINE 
-10 

TA8C /RESET TAB COUNTER 

MAIN /NEXT CHAR 



UCLP03 LAC 
XCT 
jMS 
Jfi 

UCLP04 tSZ 
LAC* 
AND 
SZA 
jMP 
XCT 
JMP 

ISZ* 

/ 
/ 

UCLP05 .TMS 
.rMP 
/ 
/ 
/ 
/ 
/ 
/ 



CIS 

MIX 

PUTCH 

RESETL 

COP 

LPBUF 

C377 



/CARRIAGE RETURN 

/PLACE IN BUFFER ONLY ON IMAGE! ! I 



/A BLANK LINE IS STILL A REAL CHaW SINCE FF 

/ZERO CHAR COUNT?? 

/COUNT ONLY IN LOi^ 8 BITS 

/SKIP IF ZERO COUNT 
UCLP05 /NON-ZERO, JUST GO DO REGULAR 
MIX /IMAGE OR lOPS 
LPNEXT /IMAGE 00 NOTHING 
LPBUF /lOPS MAKE FAKE 1 COUNT 

/wE ARE DOING A BLANK LINE, AND 

/COUNT MAKES SPOOLER VERY ILL 
LPSET /SEND BUFFER TO POP-11 
LPNEXT /CAL EXIT 



rHARACTER UNPACKING ROUTINE 
THIS ROUTINE "OWNS' THE MQ 



/ 
/ 
/ 
/ 
/ 

getch 



CHARACTERS ARE OBTAINED FROM X12 POINTER. EACH CHAR 
IS RETURNED RIGHT JUSTIFIED IN THE AC 
TFMPl HAS A MINUS COUNT PF THE WORDS TO BE OBTAINED 
FROM THE INPUT POINTER X12 





XCT 

SKP 

.rMP« 



MIX 

GETSW 



NnW Dn IMAGE MODE 
TEMPI 



/ 

GETSW 

/ 

getcm 



TSZ 

SKP 

JMP 

LAC* 

ISZ 

jMP 



AND 
JMP* 



UCLP04 

X12 

X12 

GETCM 



C177 

GETCH 



/SKIP IF IT IS ASCII 



/GETSW IS POINTER TO CORRECT ACTIUN ON OnTHE 
/CORRECT ONE OF THE FIVE POSSIBLE CHAR'S 



/SKP ON NOT THRU YET 
/DONE 



/FINISH UP IN COMMON 

/POINTER TO CORRECT ACTION, INITi&D FROM GETIN 
/FILLED BY JMS GETSW AFTER EACH CHAR 
/COMMON FINISH UP, STRIP XTRA BITS 
/OUT 



/ 

SETIN GETl 

/ 

/ INDTVtOUAL CHARACTER ACTION 

/ 



/INIT GETSW TO POINT TO FIRST CHAR ACTION 



GETQ 

/ 

GETl 



GET2 
GET3 



GET4 



JMS 
ISZ 

jMP 

JMS 

JMP 

LAC* 

ISZ 

lmo 

LLS 
JMS 
LLS 

JMS 

LLS 
DAC 
LAC* 
TSZ 

lmq 

LAC 
LLS 
JMS 
LLS 



GETSW /AFTER 5TH CHAR, POINT BACK TO FIRST 



TEMPI 

.♦3 

RESETL 

UCLPa4 

X12 

X12 

7 

GETSW 

7 

GETSW 

4 

GETSW 

Xi2 

X12 

GETSW 
3 

GETSW 
7 



/OUT OF PAIRS? 

/CONTINUE IF OK 

/END OF LINE RESET SONE STUFF 

/FIRST WORD OF PAIR 

/INTO MQ FOR SHIFTING 

/DONE, LEAVE POINTER FOR SECOND CHAR 

/SECOND CHAR 

/LEAVING POINTER FOR THIRD 

/THE HALF-AND-HALF CHAR 

/VERY TEMPORARY 

/CANiT END IN MIDDLE OF PAIR 

/SECOND WORD TO SHIFTER 

/BRING BACK FIRST 

/COMPLETE CHAR 

/LEAVING POINTER TO FOURTH ACTION 



Figure 4-1 
PDP-15 LPll DOS Handler (cont.) 
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408 
4«0 

410 
411 
412 
413 
414 
419 
418 
417 
418 
419 
420 
421 
422 
423 
424 
425 
428 
427 
428 
420 
430 
431 
432 
433 
434 
439 
438 
437 
438 
43g 

440 
441 
442 
443 
444 
449 
448 
447 
448 
449 
490 
491 
492 
493 
494 
499 
498 
497 
498 
499 
480 
461 
482 
483 
464 
469 
466 
487 
468 
489 
470 
471 
472 
473 
474 
479 
470 
477 

479 
480 
481 
482 
483 
484 
489 
488 
487 
488 
489 
498 
491 
492 
493 
494 
495 
498 
497 
498 
499 
900 
901 
902 



00383 R 100332 R 
00364 R 640807 A 
00369 R 600336 R 



GET9 



JM3 



GETSM 

7 

GETQ 



/UE/kViNG '■OS! 5 

/B*CK TO TOP FOR POINTER TO 1 



00366 
00367 
00370 
00371 
00372 
00373 
00374 
00375 
00376 
00377 

00400 
00401 
00402 
00403 
00404 
00405 
00406 
00407 
00410 
00411 
00412 
00413 
00414 
00415 
00416 
00417 
00420 
00421 
00422 
00423 
00424 
00425 
00426 
00427 
00430 



000000 
500651 
540642 
600400 
940647 
600415 
440547 
740000 
460940 
620427 

200951 
740200 
600412 
220541 
540647 
620366 
200645 
400554 
620366 
600374 
200642 
400534 
600422 
200531 
040532 
140551 
200647 
600376 
400554 
600374 
440547 
600376 
620366 
000000 
620366 



00431 R 000433 R 



00432 R 

00433 R 

00434 R 



100427 R 
060580 R 
180427 R 



00435 
00436 
00437 
00440 
00441 
00442 



00444 
00449 
00446 
00447 
00490 
00491 
00492 
00453 



00454 
00455 
00456 
00457 
00460 
00461 
00462 
00463 



746030 
740020 
260560 
060960 
440560 
600432 



777777 

040547 
777770 
040553 
200545 
040946 
140592 
620443 



100512 
140551 
440470 
600471 
750030 
000540 
200692 
080S41 



CHARACTER PUTTER FOR POP-ll 

TWO CHAR'S PER WORD FORMAT. FIRST CHAR IS RIGHT JUSTIFIED* SECOND 
IS PLiCED IMMEOIATELT ABOVE FIRST. LEAVING TOP TWO BITS OF WORD 
UNUSEn. CHAR IS OELEVERO TO US IN AC. INIT PUTSW BY DAC'ING CONTENTS 
OF PUTIN INTO IT. ROUTINE COUNTS THE OUTPUT CHARS IN LBF 

THIS ROUTINE ALSO HANDLES FORM FEED PAGE CONTROL 

THE PDP-11 ASSUMES LINES HAVE A LF IN BEGINNING AND CR AT END 

SO THIS ROUTINE REMOVES. ANT LEADING LF. 



UTCH 



PUTY 
PUTZ 



/ 

PUTLF 



PUTW 
PUTFF 



PUTLFR 



pUTSW 

t 

PUTIN 

t 

PUTO 
PUTl 

7 

PUT2 





AND 

SAO 

.IMP 

SAD 

JMP 

ISZ 

NOP 

ISZ* 

.IMP* 

LAC 

SZA 

JMP 

LAC* 

SAD 

JMP* 

LAC 

XCT 

JMP* 

JMP 
L*C 
XCT 
JMP 
LAC 

nAC 
nZM 

LAC 
JMP 
XCT 
JMP 
ISZ 

jMP 
JMP* 

JMP* 

PUTl 

JHS 

OAC* 

JMS 

ClUiSWHA 

QAR 

XOR* 

OAC* 

ISZ 

JHP 



C377 

tl2 

PUTLF 

C14 

PUTFF 

FIRST 

LPBUF 
PUTSW 

COP 

PUTW 

LPBUFD 

£14 

PUTCH 

C15 

MIX 

PUTCH 

PUTY 

£12 

FFSW • 

PUTLFR 

PAGSIZ 

PACCNT 

COP 

£14 

PUTZ 

MIX 

PUTY 

FIRST 

PUTZ 

PUTCH 

PUTCH 



PUTSW 

PUTP 

PUTSW 



PUTP 
PUTP 
PUTP 
PUTO 



/STRIP TO EIGHT BITS 

/SPECIAL CASE #1, LINE FEED 

/GO 00 IT 

/SPECIAL CASE «2, FORM FEED 

/GO DO IT 

/BUMP FIRST TIME THRU SWTICH 

/IN CASE SKIPS, WE DON'T NEED IT HERE 

/COUNT AN OUTPUT CHAR 

/DISPATCH TO FIRST OR SECOND CHAR ACTION 

/HAS A REAL CHAR OCCURRED SINCE FF? 

/SKIP IF NO REAL CHAR 

/GO DO REGULAR 

/IF WE ALREADY HAVE A FF 

/IN BUFFER OUT, DON'T NEED A CR 

/LEAD WITH CR» SO PDP-H DOESN'T PUT ON AUTOMATIC LF 
/BUT DO NOTHING FOR IMAGE MODE 

/GO REAJOIN 

/GET BACK LINE FEED 

/ISZ OR NOP FOR COUNT OF FF PER PAGE 

/NO FORM FEED NOW 

/FORM FEED, RESET PAGE COUNTER 

/FLAG SAYING FF OCCURRED. 

/FORM FEED CODE 

/GO COUNT CHAR, AND PLACE IT 

/SKIP ON lOPS ASCII 

/IMAGE, ACTUALLY PLACE LF 

/ASCII, IS IT FIRST THRU? 

/NOT FIRST, 00 LF 

/FIRST TIME, JUST RETURN 

/INIT'EO AS PUTl. FILLED LATER BY JMS PUTSW 

/DONE, RETURN 

/START AT FIRST CHAR 

/LEAVE POINTER FOR FIRST AFTER SECOND 

/FIRST CHARACTER ACTION, PLACE RIGHT JUSTIFIED 

/LEAVING POINTER FOR SECOND 

/PUT CHAR IN RIGHT PLACE 

/PUT HALVES TOGETHER 

/BOTH IN BUFFER 

/MOVE POINTER 

/GO TELL PUTSW THAT PUTl IS NEXT 



/ 

/ OUTINE TO RESET LINE AND TAB COUnTRS 
/ 



LAM 
OAC 
LAW 
OAC 
L»C 
OAC 

nZM 

JMP* 



-1 

FIRST 

-10 

TABC 

LINLIM 

MAXC 

BLANKC 

RE8ETL 



/SET FIRST CHAR OF LINE REMEMBERER 
/SET TAB COUNTR 
/SET UP MAX PER LINE COUNTER 
/RESET SPACE AND TAB COUNTER 



'.TITLE .CLOSE FUNCTION 



/ 
/ 

/.CLOSE 
/ 

lPclos 



00464 H 100917 R 



JMS LPIOCK /CHECK I/O UNDERWAY. 

nZM COP /SAY A FF OCCURRED 

TSZ LPCL8W /777777 IN AC IF HAVEN'T SEEN THRU CLOSE COoe 

JMP LPCLON /DONE. 

CLAIIAC /SPOOLER REQUIRES FF,CR AS CLOSE 

DAC* LPBUF /JUST GIVE FF TO DRIVER, HOWEVER 

LAC £6414 /THIS IS FF,CR IN PDP-11 

DAC* LPBUFD /FIRST OaTa WORD POINTER 

/THIS MEANS ALWAYS A FF ON CLOSEiU 

JHS LPSET /SEND BUFFER TO POP-ll 



Figure 4-1 
PDP-15 LPll DOS Handler (cont.) 
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903 
904 

909 
906 
907 
908 
909 
910 
911 
912 
913 
914 
919 
916 
917 
918 
919 
920 
921 
922 
923 
924 
929 
926 
927 
928 
929 
930 
931 
932 
933 
934 
935 
336 
937 
938 
939 
940 
941 
942 
943 
944 
949 
946 
947 
948 
949 
990 
991 
992 
993 
994 
999 
996 
557 
998 
999 
960 
961 
962 
963 
964 
969 
966 
967 
968 
969 
970 
371 
972 
973 
974 
379 
976 
977 
978 
979 
980 
981 
962 
983 
984 
989 
986 
987 
988 
989 
390 
991 
392 
393 
994 
595 
996 
997 
998 
599 
600 
601 
602 



130466 
80467 
00470 
00471 
(10472 
03473 



00474 
00475 
00476 
00477 
00900 
00901 
00902 
00503 
00504 
00509 
00906 
00907 
00^10 
00911 



:?■■ *3 B 

70:2344 * 
620927 R 
777777 * 
777777 * 
040470 R 
600125 R 



220527 
500633 
741200 
600510 
200653 
500527 
040527 
220530 
500654 
240527 
040527 
44PI530 
100512 
60O125 



00512 R 000000 A 

08913 R 200533 R 

00514 R 741200 A 

00515 R 620512 R 

00516 R 600466 R 



00517 R 000000 A 

00920 R 200537 R 

00521 R 160542 R 

00522 R 706001 A 
00923 R 600922 R 



00924 R 706006 A 
00929 R 040933 R 
00926 R 620517 R 



00927 R 000000 A 

00930 R 000000 A 

00931 R 777706 A 
00532 R 777706 A 
00933 S 777772 A 



08934 R 440532 R 
00535 R 440532 R 



00936 
00937 
80940 
00941 
00942 
00943 
00944 
00949 
00946 
00947 
00990 
00951 
00552 
00553 
00554 



00555 
00596 
00957 
00960 
00561 
00962 
00963 
00964 
00969 
00966 
00567 
00970 



200629 

040003 
220699 
742020 
740020 
900696 
741200 
340696 
340613 
040613 
220613 
040545 
440613 
220613 
040544 



220643 
740030 
040543 
220543 
040937 
040543 
723002 
040542 
723002 
040593 
723005 
040541 



00571 R 200657 R 

00572 R 060943 R 



lPcalx 
lpclsw 

UPCLON 



J**5 

OBR 

JMP* 

777777 

LAW -1 

DAC 

.rMP 



RESETL /RESET THE WORLD 



LPCALP 



LPCLSW 
LPNEXT 



/HANG ON CAL. 

/-I » .CLOSE NOT OCjE. 



/INITIALIZE .CLOSE INDICATOR 
/EXIT. 



.TITLE .WAIT FUNCTION 



/ 

/.«*ATT OR .WAITR 

/ 

lPwaIT lac* LPCALP 

AND C1O00 

SNA /BIT 8 

JMP LPWATl /.WAIT 

LAC C700000 ' /LINK, 

4N0 LPCALP 

DAC LPCALP 

LAC* LPARGP 

ANO £77777 

XOR LPCALP 

nAC LPCALP 

TDX LPARGP 
LPWATI JMS LPIOCK 

.TMP LPNEXT 
/ 

/CHECK FOR I/O UNDERWAY 
/ 

/LPUND WHEN FREE* NON0 WHEN BUSY 
/ 
LPIOCK 

LAC LPUND 

i^NA 

JMP* LPIOCK 

JMP LPCALX 
/ 

/ SETUP ANO OUTPUT TO PRINTER. 
/ 

lpset 



» 1 FOR .WAITR 

- GO HANG ON CAL. 

ETC. 



/15-8IT BUSY ADDRESS. 



/CHECK I/O UNDERWAY. 
/OK - RETURN. 



/0 » NO ACTIVITY. 



/NO I/O UNDERWAY. 

/HANG ON CAL TIL NOT BUSY, 





L*C 

nZM* 

SIOA 

jMP 



LPTCB 
LPEV 



•1 



/SEND TCB POINTER TO POP-U 
/CLEAR THE EVENT VARIABLE 

/MAKE SURE ITS ABLE TO GET IT 
/NOTE THAT THIS IS PROTECTED SINCE 
/ THE LIOR WILL BE ISSUED DIRECTLY 
/ AFTER THE 5I0A (FREE INSTRUCTION! , 

LlOR 

OAC LPUND /SET I/O BUSY FLAG. 

jMP* LPSET 

'.TITLE INITIALIZATION CODE AND TEMPORARIES 



/ 

lpcalp 
lParcp 

PAGSIZ 

P*6CNT 

LP'JNO 

/ 

/ 

FF3W 
FFFF 



FFSW 
FFFF 

INIT 

lptcb 
lpbuf 

LPBUFD 

LPEV 

TEMPI 

bufstz 

LiNLIM 

maxc 

FIRST 

TCHAR 

COP 

BUANKC 

T*BC 

Mix 

/ 

/ NOW 

/ 

lPac 
lPout 

X12 

PUTP 







.FORMS 

.FORMS 

.6 



'.IFUND NOFF 
TSZ PAGCNT 
ISZ PAGCNT 
'.6N0C 

'.IFOEF NOFF 
MOP 



NOP 

lENDC 

L*C 

DAC 

LAC* 

RTR 

RAR 

AND 

SNA 

TAD 

TAD 

nAC 

L»C« 

o*c 

ISZ 

LAC* 

nAC 



/POINTER TO CAL AOOR 
/POINTER ARGUMENTS OF CAL 
/ASSEMBLED LINES PER PAGE 
/COUNT THE LINES HERE 
/0"FREEs*»BUSY»-«FRROR 
/COUNTS UP TO INITAL BELOW 



/ACTION FOR FORMS CONTROL, NEMORY 
/FFSW LOADED INTO HERE 



/ACTION FOR FORMS, MEMORY 
/FFSW LOADED INTO HERE 



CNOP 

NEW 

C.SCOM+4 



t6 

C8 

LBFTP 

LBFTP 

LBFTP 

LINLIM 

LBFTP 

LBFTP 

BUFSIZ 



/WRITE OVER JUMP TO HERE 
/PREVENT RE-ENTRY 

/GT PRINTER LINE WIDTH 

/MOVE TO '6< POSITION 
/STRIP GARBAGE, LITERAL t 

/TREAT CUNDEFINED5 AS 
/POINTER TO CONSTANTS 

/LINE WIDTH 



/BUFFER SIZE 



132 COLUSNi??! 



SET UP POINTERS TO BUFFER AND TCB LOC'S 



LAC* 

lAC 

DAC 

LAC* 

DAC 

nAC 

AAC 

OAC 

AAC 

DAC 

A*C 

nAC 



MAKE TCB 



C,SCOM*100 /POINTER TO TABLE OF POINTERS 

/OUR POINTER IN TABLE +1 
TEMPI 
TEMPI 
LPTCB 
TEMPI 
2 

LPEV 
2 

TABC 
5 
LPBUFD 



/POINTER TO TCB 

/POINTER TO FILL LOCATIONS 

/MAKE POINTER TO EVENT VARIABLE 

/MAKE POINTER TO TCB POINTER 

/TO BUFFER AOOR 

/MAKE POINTER TO FIRST DATA HORO 



L*C 
OAC* 



CAPISLT*400*APILVL 
TEMPI. /STORE In TCB 



/BUILD THE API RETURN 



Figure 4-1 
PDP-15 LPll DOS Handler (cont.) 
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003 


00373 


R 


440543 


R 


T8Z 


TEMPI 


604 


B0574 


R 


200600 


R 


L*C 


(DEVCO 


805 


00575 


R 


060543 


R 


D*C* 


TEMPI 


006 


08576 


R 


440543 


R 


mKTCR isz 


TEMPI 


007 


00577 


R 


16B543 


R 


nZM* 


TEMPI 


006 


00600 


R 


44B533 


R 


!SZ 


UPUNO 


009 


00601 


R 


600576 


R 


JHP 


MKTCB 


010 


00002 


R 


200543 


R 


L*C 


TEMPI 


on 


00003 


R 


060553 




n*c* 


T*BC 


012 


00604 


R 


040540 




n*c 


I.PBUF 


013 


00005 


R 


100443 




JMS 


RESETL 


614 


00600 


R 


000056 




C»L 


4PISLT 


615 


00607 


R 


000016 




16 




010 


00610 


R 


706141 




lssf 




017 


00611 


R 


000026 




LPINT 




016 


00612 


R 


600003 




JMP 


NEW 


619 










/ 




620 










;oEc 




621 


00613 


R 


000612 


R 


LBPTP .-1 




622 


00614 


R 


777600 




.80 




623 


00615 


R 


000044 




36 




624 


00616 


R 


777610 




.120 




625 


00617 


R 


000064 




52 




626 


00620 


R 


777574 




.132 




627 


00621 


R 


000070 




56 




628 






000000 




'.END 






00622 


R 


017777 




L 






00623 


R 


600011 




L 






00624 


R 


600036 




L 






00625 


R 


740000 




>L 






00626 


R 


000000 




'I 






00627 


R 


700042 




L 






00630 


R 


177777 




tL 






00631 


R 


177001 




L 






00632 


R 


000000 




>L 






00633 


R 


000137 




'I 






00634 


R 


004000 




'L 






00635 


R 


001000 




>L 






00636 


R 


741000 




>L 






00037 


R 


000400 




*l 






00640 


R 


000177 




*L 






00641 


R 


000135 




*L 






00642 


R 


000012 




>i. 






00643 


R 


000288 




*L 






00044 


R 


008011 




>L 






00045 


R 


000019 




>L 






00646 


R 


000020 




►L 






00647 


R 


008014 




>l 






00650 


R 


000021 




►L 






eoosi 


R 


000377 




*l 






00052 


R 


880414 




>L 






00083 


R 


708800 




>L 






00054 


R 


077777 




►L 






00655 


R 


000104 




»L 






00656 


R 


000006 




»L 






00657 


R 


027002 




»L 






00660 


R 


000004 




>L 






SIZE*00661 




NO ERROR LINES 





/INCRMT. POINTER TO TC8 
(DEVCOO /PIREX CODE FOR LP IRIVER 
/STORE In TCB 
/ZERO THRU FIRST SUFFER LOC 



/DONE VET ? - IF NOT THEN LOOP 

/THIS POINTS TO BUFFER 

/TO LOCATION IN TCB T^AT NEEDS 

/AND A POINTER FOR US 

/RESET LINE AND TAB COUNTRS 

/ISSUE SETUP CAL TO ESTABLISH INTERRUPTS 



/POINTER TO SIZE TABLE 



Figure 4-1 
PDP-15 LPll DOS Handler (cont.) 



4-12 



APILVL The API level at which PIREX should interrupt the PDP-15; 

this is used in TCBs and in the definition of CAPI. APILVL 
should indicate API level 0, 1, 2, or 3. 

APISLT The API slot to which PIREX should issue interrupts; used in 
TCBs and in the CONNECT/DISCONNECT software directives. 

DEVICE In this case LSSF, one of the four possible UC15 skips. This 
SKIP skip is determined by which API level is chosen. 
SKIP = APILVL*20 + 706101 

The skip is used in the standard setup interrupts CAL (Fig- 
ure 4-1, lines 614-618) 

SIOA Skip if PDP-11 can accept a TCBP mnemonic; (706001) . 

LIOR Issue TCBP mnemonic; (706006) . 

CAPI Clear interrupt flag mnemonic; set to APILVL * 20 + 706104, 
used in interrupt service routine. 

DEVCOD The device code as defined in PIREX: used in TCBs 

NOTE: The conditional use of the spooled bit (PDP-11 bit 7) 
(Figure 4-1, lines 71-76) . 



4.6.1.1 Initialization - The CAL entry of a DOS-15 handler must have 
a once only section of code that: 

1. Sets up a pointer to one of the reserved TCB areas in the 
DOS-15 monitor. This is done by locating a pointer to the 
TCB area in the table pointed to by .SCOM +100 (Figure 4-1, 
lines 586, 590) 

2 . Computes pointers to the various locations within this TCB 
area, such as the event variable (Figure 4-1, lines 591-597) . 

3. Constructs the constant fields within the TCB such as the 
API RETURN and device code (Figure 4-1, lines 601-609) . 

4. Sets up a pointer to the data area in the TCB, which will be 
used as a buffer (Figure 4-1, lines 610-612) . 



4.6.1.2 Request Transmission - When issuing requests to a task from a 
PDP-15 program, the requesting program (e.g., a PDP-15 I/O handler) 
issues the following sequence of instructions. 

DZM EV /CLEAR EV IN TCB 

LAC (TCB /ADDRESS OF TCB IN AC 

SIOA /MAKE SURE PDP-11 CAN ACCEPT REQUEST 

JMP .-1 /WAIT FOR IT IF NOT 



(1) Level may be used, but is not recommended because it could hang 
the PDP-15 system if the interrupt occured at the wrong time. 
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LIOR /ISSUE REQUEST TO THE PDP-11. THIS CAUSES A LEVEL 
/7 INTERRUPT TO THE PDP-11 and CONTROL TRANSFERRED 
/TO THE LEVEL 7 HANDLER IN PIREX. 

The instruction sequence which issues requests to tasks from the PDP-15 
should have an identical format as shown above. These five instruc- 
tions are ordered in a way which: 

1. Clears the event variable (EV) before issuing the request. 

2. Allows an interruptible sequence while waiting for the PDP-11. 

3. Allows a non-interruptible sequence once the SIOA instruction 
skips and the LIOR is issued. 

This occurs because the PDP-15 always allows a non-interruptible 
instruction following an lOT (in this case the SIOA) . The SIOA and 
JMP .-1 sequence is interruptible immediately following the execution 
of JMP .-1. 

The LPSET routine is used by the line printer handler to perform the 
request transmission and thus send data to the line printer (or line 
printer spooler) task (see Figure 4-1, lines 541-550) . 



4.6.1.3 Interrupt Section - Result Reception - After receipt of a 
request to PIREX, the PDP-11 will use the contents of the TCB to 
schedule the referenced task. 

Meanwhile, the requesting program can either: 

1. Give up control and wait for an interrupt from the PDP-11 as 
in the DOS-15 line printer handler case or 

2. Test the EV until it goes non-zero, i.e., 
LAC EV 

SNA 

JMP .-2 

to determine completion of the request. The EV is automati- 
cally set to a non-zero value by the referenced task when the 
request has been completed.- 

Interrupts generated by the PDP-11 for the PDP-15 are serviced by the 
PDP-15 in a fashion identical to regular PDP-15 interrupts. As in a 
non-API environment, a SAPI N (N = 0, 1, 2, or 3 depending on what API 
level would have been used if the PDP-15 had API) instruction tests 
for the flag associated with the request. In an API environment, the 
appropriate API trap address must be set up before the interrupt 
occurs. When program control is transferred to the interrupt service 
routine, a CAPI N instruction must be issued to clear the hardware 
flag associated with the request. 



(1) When interrupt returns are used, the EV is set to non-zero just 
prior to the issuing of the interrupt. 
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After clearing this flag, the event variable should be tested to detect 
124-lf8^ condition (negative event variable). See Figure 4-1, lines 

If an error has occurred, the event variable should be tested for a 
possible PIREX out-of-node condition (PIREX ran out of space to store 
tne request) . If the error was an out-of-node error CR (EV = 177001) 

lAaf^^^ ^^^ request should be attempted (See Figure 4-1, lines 144- 

149 ) . 

If the error was not an out-of-node error, an error message should be 

^K? ^^ u""^!? • '^^^ ^''''°'' ""^^^ ^^°"1^ ^^ composed of the event vari- 
able and a handler mnemonic such as LPU (Figure 4-1, lines 136-139 
160 ) ' 



^ih^'^ K*^^^ ^""t '^^'^^ Requests - Actual input and output is accom- 
plished by using typical DOS-15 handler code with the following excep- 

1. The TCB is used as the data buffer^ 

2. The actual I/O is done by calls to the TCB transmission 
routine. In the example this is a call to LPSET (Figure 4-1, 



4.6.1.5 .CLOSE Function - If PIREX provides spooling services for the 
device, there is a need to inform the device's spooler module that the 
current 30b has completed so that the spooler is forced to process anv 
^hi^nnS^i?T^5^^^"^4^^^ buffers. The writer must insure Ihat both 
the DOS-15 handler and the PIREX spooler module agree upon a conven- 
tion to indicate this end-of-file. In the example, a form feed car- 
nage return (6414) acts as an end-of-file (Figure 4-1, lines 497-502). 



4.6.2 PDP-11 Requesting Task 

Tasks such as MACll may execute under control of the PIREX executive 
m a background mode. Considerations such as TCB structure and event 
variable checking are similar to those of the DOS-15 handler. 

When the requesting program is a PDP-11 task, it must issue the initi- 

?n^ ItTt^^ Tr^'^.i^^S^ ^"^ ^^^^ °^ ^^^ 5 instruction sequence shown 
for the PDP-15. (See Section 4.6.2). If the task being requested has 
a higher priority than the current one issuing the request, it will 
execute immediately; otherwise, control will return to the first in- 
struction following the IREQ macro. IREQ is defined as follows: 

.MACRO IREQ TCBP 
MOV TCBP,R5 
MOV #100000, R4 



(1) Depending on Driver task design the TCB need not be used as a data 
Durrer for NPR devices. 
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lOT 

.BYTE 2,0 

.ENDM 
The #100000 in R4 is used by PIREX to identify a PDP-11 request 
A TCBP is a TCB pointer. 



4.6.3 UNICHANNEL Device Handlers for RSX-PLUS III 

The following description of how to write a UNICHANNEL device handler 
for RSX PLUS III does not discuss those topics pertaining to all 
RSX I/O handlers, see the chapter on Advanced Task ^onstruction in_ 
the RSX-PLUS III Operating Svsteiti Refer ence Manual (DEC-15-IR0MA-A D) 

4 6 3.1 Definition of Constants - Several constants are defined in 
a' UNICHANNEL handler's source file before any executable code (see 
Figure 4-2, lines 66-79). These constants include: 

APISLT The API slot to which PIREX issues interrupts; this is 
used in TCBs and the CONNECT /DISCONNECT software 
directives. 

APILVL The API level at which PIREX interrupts the PDP-15; 
this is used in the TCB and in definition of CAPI. 
APILVL should indicate API level 1, 2, or 3. 

DEVICE UNICHANNEL device skip equated to APILVL*20+706101. 
SKIP 

SIOA Mnemonic for "skip of PDP-11 can accept a TCBP"; 
706001. 

LIOR Mnemonic for "Issue TCBP"; 706006. 

CAPI Clear interrupt flag mnemonic; set this to APILVL 
*20+706104. It is used in the interrupt service 
routine. 

DEVCOD The device code as defined in PIREX; this is used in 
TCBs. 



4.6.3.2 initialization - The handler initialization is l^^^^ed 
immediately following these definitions (see Figure 4-2, lines 262-320) 
D^ing handler initialization, the PIREX device driver status must 
be cleared and the event variable checked to see if the driver is 
functioning (see Figure 4-2, lines 287-304). Since it is not obvious 
to RSX She?her or not the driver is operational, a message should be 
pointed before the handler exits if the driver is not running under 
PIREX. 
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kSE 1 Cn...', i»2f CO.... CR15/UC15 CARD REiOER EDIT »a20 

1 .TITLE CO.... CR15/UC1S CARD READER EDIT «02e 

2 / 

3 I 

4 / FIRST PRINTING, FEBRUARY 1974 

5 / 

6 / THE InFORmATTON IN THIS DOCUHENT IS SUBJECT TO 

7 / CHANGE WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED 
a / AS A COMMITMFNT BY DIGITAL EQUIPMENT CORPORATION. 
9 / DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPON- 

jg / SISILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS 

jl / DOCUMENT. 

12 / 

13 / THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FUH- 

14 / NI8HED TO Tmf purchaser UNDER A LICENSE FOR USE ON 

15 /A SINGLE COMPUTER SYSTEM AND CAN BE COPIED CWITH 
jg / INCLUSION OF OTGITAL'S COPYRIGHT NOTICE! ONLY FOR 

17 / USE IN SUCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PRO- 

18 / VIDEO IN WRITING BY DIGITAL. 

19 > 

jj, / DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 

21 / FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EOUIP- 

22 / MtNT THAT IS NOT SUPPLIED BY DIGITAL. 

23 ' 

24 / COPYRIGHT tCI 1974, BY DIGITAL EQUIPMENT CORPORATION 

25 / 

26 / 

27 .EJECT 

SCR CLEANUP 
,cui, -^i^ ..V." CK16 ERROR HANDLING; RRN SWITCHl 

::, /EDIT •l«18 SCR FIX COON HANDLING CHlb VERSION 

,, /tOiT <»t«17 SCR CLEANUP, IBUTHI DEVICES 

^■^. /tOXT ni'.lb SCR MORE UC15 CODE 

•'■' - --" START TO PUT IN UCl5 CODE 



49 



/tDlT 


HH23 


P/2/74 


/EDIT 


«(ill9 


SCR 


/EDIT 


• l«18 


SCR 


/EDIT 


<»t«17 


SCR 


/EDIT 


*V\b 


SCR 


/EDIT 


«(«15 


SCR S 


/EDIT 


os-ia 


1-18-7; 


/EDIT 


#14 


6-26-7 



35 

" /COPYRIGHr 197:^, "digital EQUIPMENT CORP., MAYNARO, MASS. 

,g /C.W. KEMP W.A. DESIMONE. G. M. COLE 

'' /roil r»6i, (iEinFR CONTROL HANDLER TASK. THIS CONTROL WILL 



/CR15 CARU REAnfR CONTROL HANDLER TASK, 

'^. /SUPPORT sorban and documation headers. 

42 

43 



CW16 COOF IS obtained WITH NO ASSEMBLY PPARAMETERS 



/ TO CBTAIN UC15 CODE DEFINE UC15«0. 

/ acditional uci5 parameters: 

/ define nospi «?l to disable spooling for card reader. for instance 

/ IF SPOOLER PACKAGF DOESN-T HAVE CARD READER ASSEMBLED IN FOR SPACE REASONS. 
/ AN EQUATE Fob APILVL IS NECESSARY TO SET UP 
/ lOT'S FOR CORRECT PRIORITY LEVEL TO CLEAR PIREX REQUEST. 
5P / PkESEKTLY LEVEL 1 IS THE CARD HEADER ASSIGNMENT. 

51 ' 

52 / W A R N I N G ! I 

" / IN ORDER FOR THE UC15 HANDLER TO FUNCTION PROPERLY, THE 

„ / PDPll MUST RF ABLE TO ACCESS OUR INTERNAL BUFFER 

" / AND TCB'S. THIS MEANS THAT THEIR ADDRESS MUST BE LESS THAN 

/ 28K TO THE PDPll. THUS, IF THE PDP-11 LOCAL MEMORY IS 8K, 

/ THIS HANDLER MUST RESIDE BELOW 2(»K IN PDPlb COREll THIS 

/ IS EQUIVALENT TO SBUPIfl OCTAL. SIMILARLY , IF THE LOCAL 

/ PDP-11 MEMORY IS 12K, THE HANDLER MUST RESIDE BELOW 



56 
57 
58 
59 

gj / 45){i««> OCTAL. 

S3 .IFOEF UC15 

64 ' 

65 I 

ee ™p9i(P'55 A APISLT»55 

67 fipnpiol A APILVL»1 

68 7(»«l?l A ChSI = APILVL*20*7ia61»l 

69 19in^9\ A SIOAB70fi0al 
7f, 7I)lfi?l'6 A LI0R«7!i!6eiMfi 

71 7?«1?4 A CAPI«APILVL*2PI + 7I'I6104 

72 / 

7j .IFUND NOSPL 

74 npiCTPimS A DEVCDD»5 

75 .ENDC 

7j .IFDEF NOSPL 

77 DEVC0D»2«5 

78 



.ENDC 
79 .ENDC 

8CI / 

gj /EDIT 14 ADDS ASSEMBLY PARAMETER ERRLUN TO SPECIFY LOGICAL UNIT 

82 / FDR ALL ERROR MESSAGES. THE IS SET TO 3 IF USED INTERACTIVELY 

83 / MOST OF THE TIME OR TO 100 WHEN USED WITH PHASE 

84 / III BATCH. LUN 10? IS DEFINED TO BE THE BATCH OPERATOR DEVICE. 

85 ' 

86 .IFuND ERRLUN 

87 ERRLUN»100 

88 .ENQC 

89 /THIS IS AN lOPS ASCII ONLY HANDLER TASK. 

9^ /IT CAN BE ASSFMBLED TO READ 029 OR 026 IBM KEYPUNCHED CARDS. 

91 /DEFINE OEC026 TO READ 02b PUNCHED CARDS. 

92 /OEC026 UNDEFINED TO READ 029 PUNCHED CARDS. 

93 / 

94 / 

95 / 

96 / THE FOLLOWING QUEUE I/O DIRECTIVES ARE IMPLEMENTED 

97 / 

98 / CPS 3600 HANDLER INFORMATION CMINF) 



Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler 
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9S 

IBB 

1(»2 
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Hi 

114 

115 
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lie 

119 
1?? 
1?1 
122 
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128 
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i3e 
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134 
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138 
139 
140 
141 
142 
143 
144 
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148 
149 

ise 

151 
132 
153 
1S4 
155 
156 
157 
158 
150 
16(1 
1«1 
182 
163 
1«4 
1«6 
166 
167 
16B 
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I7e 
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172 
173 
174 
175 
176 
177 
178 
179 

tsei 

181 
182 
183 
1«4 
189 
1»6 
187 
1«8 
IB9 
l9f 
191 
192 
193 
194 
195 

i<»e 

197 



»((»?il2 
'"0W8I13 

»B»1B2 
flpiwisij 
nn0]n4 

n^p Jfl7 
i»BI"l?3 

i»0»3?5 
i»Wi»3S2 
"^(1337 
>«nn342 
i»(iii>345 



7!ii'(592 * 
7[i|"i591 * 









EVA 










LUN 




OR HINF THE 


FOLLOWING INF0HM4TI0N IS HtTURNEO IN 




BIT 







UNUSED 




BIT 


I 


» 1 


INPUT DEVICE 




BIT 


2 


« 


NOT OUTPUT DEVICE 




BIT 


3 


m e 


NOT FILE-ORIENTED 




BITS 


4> 


11 


UNIT NUMBER 'ZEHO« 




BITS 


t?-17 


DEVICE CODE » 7 CARD READER 




CPB 




2400 

EVA 

LUN 


ATTACH CARD READER 




CP6 




2500 
EV* 

LUN 


DETACH CARD READER 




CPB 




2600 


READ CARD 


(n 






EV* 




C23 


LUf4 








C33 






^«ODE 




t4J 






HUFF 




C5) 






SIZE 





IF A REQUEST pANNOT BE QUEUED, THE FOLLOWING EVENT VARIABLE 
VALUES ARE RETURNED: 



-101 
-102 



-- INDICATED LUN ODES NOT EXITS. 

.- INDICATED LUN IS NOT ASSIGNED TO PHYSICAL DEVICE. 



-103 -- HANDLER TASK IS NOT CORE RESIDENT. 
-777 — NODE FOR REQUEST QUEUE NOT AVAILABLE. 



IF THE QUEUED I/O REQUEST CANNOT BE SUCCESSFULLY DEQUEUED, 

THE FOLLOWING EVENT VARIABLE VALUES ARE RETURNED: 

-7 — ILLEGAL DATA MODE. 

-6 -- UNIMPlEHENTED FUNCTION. 

-24 — LUN REASSIGNED WHILE ATTACH/DETACH REQUEST IN QUEUE, 

-30 — OUT OF PARTITION TRANSFER (NORMAL MODE). 

-203 — CAL NOT TASK ISSUED. 



.EJECT 
***•• CONSTANTS *•••• 

12«12 /AUTO-INOEXREG. 12 

13»13 /AUTO-INOEXREG. 13 

Rl»101 /RE-ENTRANT REG. 1 

R2"ie2 /RE-ENTRANT REG. 2 

R3»ia3 /RE-ENTRANT REG. 3 

R4»1B4 /RE-ENTRANT REG. 4 

NAOD»107 /NODE ADDITION ROUTINE ENTRY POINT 

SNAM»123 /NAHE SCAN ROUTINE ENTRY POINT 

P00L«24a /LISTHEAO FOR POOL OF EMPTY NODES 

P0VL«232 /LISTHEAO FOR PHYSICAL DEVICE LIST 

ALA0«325 /ATTACH LUN t DEVICE ENTRY POINT 

DL*0»332 /DETACH LUN & DEVICE ENTRY POINT 

0ORO>337 /0E-(9UEUE REQUEST ENTRY POINT 

VAJX»342 /VERIFY AND ADJUST I/O PARAMS. 

I0CDa345 /DECREMENT TRANSFERS PENDING COUNT. 

DMTQ-361 /DE-QUEUE I/O REQUEST (FOR ABORTING). 

D,TG»10 /POSITION OF TRIGER EVENT VARIABLE IN POVL NODE 



.IFUNO UC15 



/ 

C»«C«22 

CCAB23 

/ 

/PSUEDO-INSTR, FOR WF.SW SUBR 



/wC OCH ADDRESS. 
/CA ncH AQOPESS 



WFOFFbSNA 
WFON»SZA 



/WAITFOR CR15 NOT READY. 
/WAITFOR CR15 READY, 



/CONDITIONS FOR LOAD READER CONDITION IDT tCRLCJ, 



CC1»20 
CC2»27 
CC3«26 
CC4C04 



/CLEAR STATUS, DISABLE INTERRUPT AND DATA CHANNEL. 
/CLEAR STATUS, START READ, ENABLE INTERRUPT AND DATA CHANNEL, 
/CLEAR STATUS, ENABLE INTERRUPT, ENABLE DATA CHANNEL, 
/ENABLE INTERRS. DISABLES DCH 



/ ***** lOT INSTRUCTIONS ***** 



CRPC»706724 
CRLC»706704 
CRRS»706732 
/ 

.ENDC 
/ 

.INH»7B5522 
.tNb«70552t 

.tJECT 



/CLEAR STATUS EXCEPT CARD DONE. (ALSO DISABLES INTERR.) 
/LOAD READER CONDITIONS. 
/HEAD STATUS INTO AC. 



/INHIBIT INTERRUPTS. 
/ENABLE INTERRUPTS. 



Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 
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198 
199 
Z^U 
2t!l 
202 
2W3 
21*4 
2C5 
206 
2C7 
2C<8 

^^9 

2\ie 

211 

212 

213 

214 

215 

216 

217 

218 

219 

22« 

2?1 

222 

223 

224 

22b 
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227 

228 

229 

230 

231 
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233 

234 

236 

236 

237 

238 

239 

240 

241 

242 

243 

244 

246 

246 

247 

248 

249 

258 

251 

252 

253 

254 

255 

256 

257 

258 

259 

26e 

261 

262 

263 

264 

26S 

286 

2'!7 

268 

269 

27b 

271 

272 

273 

274 

275 

276 . 

277 

278 

279 

2PB 

281 

282 

283 

284 

286 

286 

2«7 

286 

269 

29P 

291 

292 

293 

294 

296 

296 

297 



/ — — CRl5 ST*TllS AND AC BIT ASSICNMENTf! , 

/ 

/STATUS HEGISTFK HIT ASSIGNMENTS: 

/ 

/ HIT TRANSLATION 



17 


COLUMN READY 


16 


END OF CARD 


15 


DATA CHANNEL OVERFLOW 


14 


DATA CHANNEL ENABLED 


IJ 


READY TO READ 


12 


ON LINE 


11 


END OF FILE 


10 


BUSY 


5)9 


TROUBLE t« lOR OF BITS 4 • 


5<8 


DATA MISSED 


07 


HOOPER EMPTY/STACKER FULL 


(»6 


PICK ERROR 


51b 


MOTION ERROR 


04 


PMOin ERROR 


7li-m 


UNUSED 



/AC BIT ASSIGNMENTS FOR LOAD CONDITION FUNCTION CCRLC) 

/ 

/ BIT FUNCTION 

/ 

/ 17 start read 

/ 16 data channel enable 

/ 15 Interrupt enable 

/ 14 offset card 

/ 13 clear status register 

/ 

/ STATUS REGISTER BITS CONNECTED TO FLAG AND INTERRUPT REOUESTl 

/ 

/ 17 DATA REAOYtONLY IF DATA CHANNEL NOT ENABLEOJ 

/ 16 CARD DONE 

/ 15 DATA CHANNEL OVERFLOW 

/ 09 ERROR CONDITION 

/ 

/MACRO DEFINITIONS: 

/ 

/CP MACRO FOR CARD COLUMN TO ASCII TRANSLATION TABLE B26/029 CONDITIONALIZATION 

/ 

.IFOEF OEC026 

.DEFIN CP,C26,C29 

C2607777*l 

,£NDM 

.ENOC 

.IFUND DECa26 

.OEFIN CP,C26,C29 

C29C7777*1 

.ENDM 

.ENOC 



.EJECT 



/ ***** HANDLER INITIALIZATION ***** CONCE ONLY CODED 











/START 














/IBUF 
/ 






"^wnwB 


Q 


7p"64e 


R 


/ 
START 


LAC 


tPDVL) 


flBHOI 


e 


n6'64/ 


R 


IBUF 


OAC* 


(Rl) 


«0»^9 


e 


9Pli»65B 


R 




LAC 


(HNAM) 


il9VVi% 


e 


fl6«6"il 


R 




OAC* 


(R2) 


annei4 


B 


12''652 


R 




JMS* 


CSNAM) 


»0IJI5>^ 


D 


■"B^esi 


R 




CAL 


C10) 


qnn0i« 


p 


^4(^567 


ft 




OAC 


POVNA 


0S)!»B7 


B 


727.p\e 


A 




AAC 


O.TG 


f^l»\9 


B 


5i4^57ld 


R 




DAC 


PDVTA 


flaoi) ( 


p 


0^11^577 


R 




CAL 


CCPB 


i» 010119 


p 


SO^Sfil 


R 




LAC 


EV 


"P)«n 


B 


74i li»Z 


A 




SPA 




nawi/i 


p 


"7.06^3 


R 




CAL 


tl05 


WOIWI^ 


p 


?I?P654 


R 




LAC 


CTGJ 


a«ni« 


p 


^fi^-STB 


h 




DAC* 


POVTA 


fl0«>l7 


B 


■ipiness 


H 




AND 


(700HPI) 


•>aafa 


p 


74i»^^l 


A 




TCA 




"wnpl 


B 


''4'"563 


R 


/ 


OAC 


XADJ 










.IFUND 


UC15 












LAC 


cccn 












CHLC 














.ENOC 














.IFDEF 


UC15 


•"Bw?? 


p 


10fl6?5 


R 




JMS 


CLEAR 


■"Wffl?* 


B 


9^"613 


R 




LAC 


EVUK 


'>^i»91 


B 


74O01H 


A 




RTL 




rn^af^ 


B 


74ni'»0 


A 




SMA 




■"unjH 


B 


fi|!ippi57 


R 




JMP 


WFTGR 


swfli?? 


B 


i?fl'«pi?4 


R 




CAL 


MSINIT 


wwffl^n 


P 


f7tHf^2 


»■■ 




CAL 


WFMS 


■»ani:»1 


o 


• (ii~6«i3 


R 




CAL 


C10 



/STORAGE FOR AC IN INTERR. SERVICE. 
/TOP OF INTERNAL BUFFER. 



/SCAN PDVL FOR THIS DEVICE'S NODE 



/R, R2, R6, XR, i AC ARE ALTERED 
/NODE FOUND? 
/NO " EXIT 

/YES — PDVL NODE ADDRESS IN AC. 
/SAVE NODE ADDRESS AND 
/TRIGGER EVENT VARIABLE ADDRESS 
/CONNECT INTERRUPT LINE 
/CONNECT OK? 

/NO — EXIT 

/YES — SET TEV ADDRESS 

/DETERMINE 'XR-AOJ' 



/CLEAR STATUS, DISABLE INTER, AND DCH. 
/LOAD FUNCTION. 



/CLEAR OUT PIREX DEVICE, hAIT FOR COMPLETE 

/FIND OUT IF OK 

/POPll SIGN BIT TO OURS 

/SKIP IF TROUBLE 

/NOT, GO WAIT FOR WORK 

/PRINT PIREX HAS NO CO MESSAGE 

/WAIT FOR MESSAGE COMPLETION 

/EXIT 



>^»3'< p "^mSPl k 



Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 
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?9i) 
2<J9 

3^3 



304 
3<«5 
3«6 
307 

308 
309 

3ie 

3tl 
312 
313 
314 
315 
316 
317 
318 
319 
32P 
321 
322 
323 
3?4 
325 
326 
327 
328 
329 
33e 
331 
332 
353 
334 
335 
3S6 
337 
338 
399 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
398 
351 
392 
353 
354 
395 
396 
397 
358 
359 
360 
361 
362 
363 
364 
365 
366 
367 
368 
369 
370 
371 
372 
373 
374 
376 
376 
377 
378 
379 
38ti 
381 
382 
383 
384 
385 
386 
387 
388 



•H^OJIA 




t^fjnV 


npinHii 




-Vi^i^X 


t^x;** 




H<^t]9V\ 


flp*:*? 




"IfV^'i 


i»(»»4« 




t^tftX 


m^flif 




"VAV^f 


<iiai49 




"^npnie 


»0i»4'« 




9^i?(tb 


^«'«44 




?2»?34 


9^»4<^ 




ATiVWi 


<»^tiAn 




•^491(»f« 


ovmtJ 




/I4l*34« 


mtivm" 




-.finjpZ 


'^0l9'^^ 




^ISI.'^J 


«0e««9 




"fiKifff. 


<^?i9*>y. 




«0»0S7 


'>ICI«54 




n3"41»fc 


''9''**!^ 




nfiafftt^ 



MblMT 2700 

ev 



npifiK e 777776 * 



a«tn8« 
• n»«i 
0006? 
00«0S 
00nff4 



»ji»575 
»0ff'562 
14^962 
749010 
75113li> 
«0'"071 



od-fftH *(i5ii77 R 
!»««>«7 o ^4»407 R 



Hfflo?! p •5p»66/ H 

!»0i»7? O nianifl47 R 

■^wari a i?«6«6 « 

iiipii)i7j 9 *B(«s«^7 R 



1i)|«7^ o o^n^S* R 
iiigi>«7ff o ■*<lii583 R 
1I0I»77 B 72lt«0? * 



IhTTMS 



FHRL'IN 
2 

PIH40H2I 0000001 ,*SCII "•♦• *I0 CO IN PIREX"«15> 



.fcNDC 
JmP 


WFTGfl 


.sixer 


'CO0»0»' 


.IFUND 


UC15 


.BLOCK 


121+START. 


.ENOC 




.IFDEF 


UC15 


.BLOCK 


53*ST»RT- 



/W«1T FOR TRIGGER 
/HANDLER T»SK N*ME 



.ENOC 
/ ***** ENU OF INITIALIZATION CODE ***** 
/ 

/*****•** TMt ABOVE CODE IS OVERLAYEO BY THE INTERNAL BUFFER ****** 
/****************************************************************** 
/ 

/ UC15 INTERPUPT-CAL INTERACTION WILL BE DIFFERENT 
/ KEEP INITIAL PART SEPARATE 
/ 

.IFUND UC15 
/ 

HFTtR CAL WFTCPB /inAIT FOR TEV TO BE SET 

/ 
/ ***** THE TASK HAS BEEN TRIGGERED — PICK A REQUEST FROM QUEUE 



PQ 



OZM 

LAC 

OAC* 

JMS* 

JHP 

.ENOC 



TG 

POVNA 
CRU 
CDORO) 

WFTGR 



/CLEAR TRIGGER 
/DEQUE A REQUEST 



/Rl, R2, R4, R5, R6, XR i AC ARE ALTERED 
/WAS A REQUEST FOUND? 
/NO " WAIT FOR TRIGGER 



t 
/ 
/ 

hFT&R 
PO 



.IFQEF UC15 
UC15 CODE 

THE GENERAL IDEA IS THAT ALL WAITS ARE DONE THRU 
THE TRIGGER, WE FIGURE OUT HERE WHO SET THE TRIGGER, THIS 

ALLOWS US TO GET OUT OF HUNG DEVICE, SINCE WE WAIT HERE, 
AND CAN SEE AN ABORT COMING THRU. 



TG 
TG 



CAL 

LAC 

DZH 

RTL 

SPAJClaIIAC 

JMP POl 



WFTCPB /WAIT FOR EVENT VARIABLE TG 



/FIND OUT WHO IS CALLING 

/RESET 

/ABORT BIT TO SIGN BIT 

/SKIP IF NOT ABORT, 1 IN AC, 

/GO DO ABORT IN REGULAR WAY, THE HANGING 

/READ IS REMEHBERED IN RRNj 
SAO COON /HAS A CARD BEEN DECLARED DONE BY INTERRUPT 
JhP GOTCRO /YEAH, GO TRANSLATE IT 
SAO POST /ARE ME WAITING FOR INTERRUPT 

JHP WFTGR /VFS. AND IT HASNIT HAPPFNFD VFJ; SINCE 

/COON NOT SET. WAIT ON THIS CAL REO, TO BE 
/DONE AFTER THE INTERRUPT HAPPENS, IF ABORT 
/COMES IN THE MEANTIME, HE IS PUT AT MEAD 
/OF DEQUE OF WAITING REQ.'S SO WE DO HIM, 

/TRY TO DEQUE AFTER OPERATION BEFORE WAITING 
/IN CASE WAITING FOR INTERRUPT HAS HELD OFF 
/A REQUEST. 
/DIDN'T FIND ONE, GO WAIT 



/YES -- SAVE ADDRESS OF REQUEST NODE 
/SET'JP XR TO ACCESS NODE 



/ 






/ 






/ 






/ 






/ 






PQl 


LAC 


POVNA 




OAC* 


CRl 




JMS* 


(DQRO 




JMP 


WFTGR 


/ 


.ENOC 




/ 








OAC 


RN 




TAD 


XAOJ 




PAX 





/ ***** T/O REQUEST NODE FORMAT ***** 
/ 

/ (0) FORWARD LINK 

/ (1) BACKWARD LINK 

/ (2) STL PTR. 

/ C33 PART. BLK PTR. CD IF EXM TSK). 

/ (4) TASK PRIORITY 

/ t5) I/O FCN CODE IN BITS 9-17 AND LUN IN BITS 0-8 

/ f^J -• fvENT VARISSLE AOORESS 

/ (7) CT6 PTR. 

/ tl0) EXTRA 

Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 
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3S& t tin txTh* 

39n / 



391 

39? 

393 

394 

395 

396 

397 

39e 

399 

^^v «,,4H ■» "P^lSb S JHP MINF /YES " RETURN INFO IN EW 

45.1 "51119 O l^'S";; H S*D (7771 /NO — EXIT fDEASSIGNED) REUIIEST? 

482 djim o «5i!'4fi4 h JMP D»EX /YES -- DEATTACH & EXIT 



403 



f9i\ Bffl 


s 


,jopt>5 


wm [«< 


D 


l^iip'S? 


1:^1 1!>9 


P 


S4>'6«l' 


^l^l f\ 


D 


«l!lff1?l« 


111511 1714 





^4'»6«1 


nfli w"; 


D 


«pn.j9; 


fl 71 1 c« « 





•i4''ifiS2 


lOIC? 





«!pir>i4« 


'5I0'1 1 fl 


P 


■^4ffi«.^ 


•W1 1 1 


B 


«(piffll3b 


1511 19 


S 


■i4'»«":7 


»?im 


9 


«5l''4fi4 


»(»1 14 


e 


"i4'«6fi4 


BMI 1^ 


e 


*Cin5i?2 


"Oil* 





.777772 


flWI 17 


e 


«Pli>4?4 



■^flljo 


P 


■3pei5fi7 


"■Jll?! 





''6i'647 


«»1?9 





5WI»5«4 


«i>n9:< 





"fiwfiSl 


nni ?.4 





12n6«5 


i!ll»1 •>*> 


e 


•!5i(»494 


"WliJH 


D 


"(«™4?3 



L»C 


5,x 


AND 


r7771 


SAD 


C5'241 


JMP 


ATTACH 


SAO 


fl"251 


JMP 


DETACH 


SAO 


f«?bl 


JMP 


RtAD 


S4() 


Ci»3ei 


JHP 


MINF 


SAD 


(7771 


JMP 


DAEX 


S«D 


(0171 


JmP 


CDABRT 


EVM6 L*w 


-6 


JMP 

/ 

/ ATTACH TO A 

/ 

ATTACH LAC 


SEV 


TASK 


PDVN* 


DAC* 


(Rl) 


LAC 


9N 


DAC* 


CR2) 


JMS* 


CALADl 


JMP 


SEV 


JMP 


REOCMP 



/FETCH I/O FCN CODF 



/ATTACH REQUEST? 

/YES — ATTACH TO TASK 

/NO " DETACH REQUEST? 

/YES — DETACH FROM TASK 

/NO — HEAD REOUST? 

/YES -- RfcAO CARD 

/NO — HANDLER INFO.? 



/ABORT REQUEST? 

/YES. 

/NO — UNIMPLEME 

/EVENT VARIABLE TO 



'f9\7t 


D 


sufj"? 


!"013» 


B 


''6'"647 


HOI J1 


B 


9tJ'"564 


■^WIH? 


e 


t>6!!i651 


oini s"* 


B 


15ii^«6 


I»I>I1S4 


p 


«W0i4?4 


"^is* 


p 


«PI'»493 



ntTACh 


LAC 

OAC* 

LAC 

OAC* 

JMS* 


PDVNA 

cRn 

RN 

CR21 

(DLAD) 




JMP 
JMP 


SEV 
REQCMP 


/ 


.EJECT 




/ 

/ RETURN HANDLER INFORMATION 


/ 

HINF 


LAC 
JMP 


(200097) 
SEV 



4014 Oidll^ R 'C'Si'Z R J"P CDABRT /YES. 

4S)5 iioil<t P .777772 A EVM6 LAW -6 /NO — UNIMPLEMENTED FUNCTION -- SET 

4R6 

407 

406 

409 

4181 rOi\7n P ')C«ei5fi7 R ATTACH LAC PDVNA /ATTACH LUN & DEVICE 

411 

412 

413 

414 9l0li?.4 B 12B«6«5 R JMS* CALADl /R3, R4, R5, R6, X10, Xll, XR » AC ARE ALTERED 

415 /WAS LUN ATTACHED? 

416 ?ii»i?^ B •!5i(»494 M JMP SEV /NO -- SET REQUESTOR'S £V TO 

417 ngiipK p ^0n<4?3 R JMP REOCMP /YES REQUEST COMPLETED 
416 / 

419 / DETACH FROM TASK 

420 / 

4?i fliuii?? p 9i?if5S7 R ntTACh LAC PDVNA /DETACH LUN t. DEVICE 

422 
423 

424 .. - 

425 nilii:tt B i2ii(^«6 R JMS* (DLAD) /R3, R4, H5, R6, XIB, Xll, XR % AC ARE ALTERED 

426 /WAS LUN ATTACHED 

427 H01S4 P «0"'4?4 H JMP SEV /NO — SET REQUESTOR'S EV TO 

428 001 ^« P «0'"493 R JMP REQCMP /YES — REQUEST COMPLETED 
.425 

'430 
431 
432 
433 

434 '013« B 900687 

435 00137 P «0«424 

436 / 

437 /READ CARD 
43b / 

439 ii)014a B 777776 A READ LAM .2 /CHK. FOR lOPS ASCII DATA MODE. 

440 '»0141 R •^5i''007 A TAD 7,X 

441 00149 P 74l20kt A SZA /lOPS ASCII? 

442 0014:^ P «0'<l4fiB R JMP EVM7 /NO, RETURN -5 EV. 

443 00144 P 91ffi002 A LAC 2,X /SAVE STL NODE PTR. FOR TASK lOENTIF. 

444 11014^ B r»40S'S6 R OAC STLA /SAVE VALID STL PTR. 

445 0014« P 9ini010 A LAC 10. X /YES, VAL/ADJ. HEADER ADDRESS 

446 «0147 P ne0670 k OAC* (R3] /HEADER ADDRESS. 

447 «>015" P 910011 A LAC 11, X /WORD COUNT 

448 »01S1 B i5ifi?671 H DAC* (R4) 

449 00159 P 74I»031 A TCA /SETUP COUNTER SINCE 

450 'WISS B 723002 A AAC +2 /OFFSET FOR CR APPENDAGE. 

451 '»015'1 B '>4r"5«6 R DAC CDWDCT /VAJX ALTERS THE XR. 

452 5i0li;^ P n4'»574 R DAC TCWC /SAVE IN CASE RETRY. 

453 I01fi« B 90?5^4 w LAC RN /REO. NODE ADDRESS, 

454 001S7 P ''4'»571 R OAC RRN /SAVE READ REQ. NODE ADDR, FOR ABORT, 

455 n»oi1«r» B iSflS^l R "AC* (R2) 

456 101«1 P 190672 R JMS* (VAJX) /VAL/ADJ. (ALTERS XR,AC,R3,R5) 

457 9I01»«9 B «(^0i4fi2 R JMP EVM30 /RETS. MERE IF ERROR (I/O PARAM. OUT 

458 /OF PARTITION. 

459 001«3 B 92'»670 k LAC* (R3) /ADJUSTED HEADER ADDRESS -1 TO X12 TEMP. 

460 i«(»164 B 7?-^777 A AAC -1 

461 "016'? B i4'»572 R DAC TX12 

462 ii«i«« p 723002 A AAC +2 /TEXT ADDRESS-1 TO X13 TEmP. 

463 00167 B •'4i»573 R OAC TX13 / 

464 •>I0170 P 14"i565 H OZM CDRVAL /INIT. VALID. BITS. 

465 .IFUNO UC15 

466 LAC CDON /HAS CARD DONE FLAG COME UP 5INCE 

467 SNA /LAST CARD READ? 

468 CAL WFCRCO /NO. WAITFOR CARO DONE. 

469 OZM CDON /YES. CLEAR CARD DONE FLAG. 

470 RETRY LAC (IBUF-l) /SET INTERN. BUFF ADOR-1 TO OCH CA. 

471 OAC* (CCA) 

472 OZM* (CWC) /PREVENTS DOUBLE INTERRUPTS ON ERRORSiill 
4^J LAC TCWC /RESTORE REQ, WC. 

!.■• i DAC CDWDCT 

57* n^M fcVl /kElNIT Ev. RETRY FROM ERROR, 

J7*- CRRS /READ STATUS IN OHOfcR TO CHECK FOR READER READY 

^■'7 4nU (6(1) /AND ON-LINE. 

i'r SAD (60) /STATUS BITS 12, 13 SET? 

47-, SKR /YES, ON-LINE AND READY FOR READ. 

i.^-/ JMP ERRl /NO, NOT READY. TYPE MSGl AND WAIT FOR READY. 

4BI LAC (CC2) /CONDITION CODF 2 — READ CARD. 

flfli CMLC /LOAD CONDITIONS. 

•FCRCB /WAIT FOR INTERRUPT. 



'"J CAL 

484 / 



485 
486 
487 
4«e /ACTION 



/UPON RESUMPTION FOLLOWING WAITFOR, EXAMINE EV AND TAKE THE FOLLOWING 



Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 
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4tg 

49r 

491 

492 
493 
404 
49« 

A'4t 
43/ 
49c 
49^ 

5?1 

sc? 

513 
5^4 
5C6 
5B6 
907 
SJiB 

510 
511 
512 
513 
514 
515 
516 
517 
518 
519 
520 
521 
522 
523 
524 
525 
526 
527 
528 
929 
530 
531 
532 
933 
534 
539 
536 
937 
938 
939 
940 
941 
542 
543 
544 
549 
946 
947 
948 
949 
590 
991 
952 
593 
534 
595 
956 
997 
558 
999 
560 
561 
962 
363 
564 
565 
566 
567 
568 
569 
570 
571 
572 
573 
574 
575 
676 
577 
578 
579 
S8e 
581 
582 
583 
584 
585 
586 



/IF EV RIT 9 ■ pi CTRDUBLE BIT) 
/TO ASCII *nD P4SS TO USER AS 
/IF BIT 9 • I fTROUaLE BIT) , E 
/DESCENDING NiiMFBlCAL ORDER, 
/GIVEK ERROR CONDITIONS *RE OU 
/ 

/P*T4 MISSED 00 PHOTO ERROR - 
/PICK OR MOTION ERROR - '•*• C 
/HOPPtR EMPtr OR STACKER FULL 
/READ AS A REAOfcR NOT READY CO 
/IN ALL CAStS WHEKE A MESSAGE 
/UNTIL THE EKRflR IS REMEDIED. 
/ 



LAC 

DAC 

SMHA 

SHAlRAR 

JMP 

SZLJ»AP 

JfiP 

SZLJRAP 

JMP 

SZL1R4P 

JMP 

SZLJHAR 
JMP 
JMP 



EVl 
TST 



EHR3 
ERR4 



/ 

/ 

ERR4 

ERR3 

EHR2 

ERRl 



ISZ 

ISZ 

ISZ 

LAC* 

JHS 

JhS 

LAC 
DAC 
JMP 

.EJECT 

LAC 

DAC* 

LAC 

OAC* 



ERRPT 

ERRPT 

ERRPT 

ERRPT 

TTYOUT 

WF.SM 

MFON 

(ERRPT+1) 

ERRPT 

RETRY 



T)(12 
tX12) 
TX13 
CX13) 



, NO ERRORS. TRANSLATE CARO PUNr'ES 

5/7 PACKED ASCII. 

RROR BITS 08 TO 04 ARE CHECKED IN 

THE FOLLOWING ERROR MESSAGES FOR THE 

TPUT! 

'••* CO DATA MISSED/PHOTO ERROR' 
D PICK ERROR' 

- IGNORED. CAUGHT ON SUBSEQ. 
NDITION. 

IS TYPED, THIS HANDLER TASK MARKS TIME 
AT THIS POINT, THE CARD IS REREAD. 

/EV SET AT INTERR. LEVEL TO CONTENTS OF 

/STATUS. SAVE TEMP. 

/SWAP HALVES FDR TROUBLE BIT CHECK, 

/IF NEG., TROUBLE. 

/NO TROUBLE. GO TRANSLATE. 

/DATA MISSEDT 

/YES. 

/NO. HOPPER EMPTY/STACK. FULL? 

/YES. IGNORE. WHEN NEXT CRD. READ CAUGHT AS NOT READY. 

/PICK ERROR? 

/YES, 

/MOTION ERROR? 

/YES. 

/NO, MUST BE PHOTO ERROR. 



/ERRMSG. BUFFER ADDR. TO AC. 
/TYPE MESSAAE. 
/WAITFOR REAOeR HEADY. 

/REINIT. ERRPT. 

/READ ANOTHER CARO, 

/SET AUTO INDEX REG. 



NOW BRING BACK RN FROM RRN, IN CASE RN OESTROVEO IN MEANTIME 



CDOPTR 



LAC 

OAC 

LAC 

OAC 

LAW 

OAC 

LAW 

DAC 

LAC* 

SAO 

JMP 

SAO 

JMP 

LAC 

OAC 

LAC 

OAC 

ADD 

OAC 

LAC* 

AND 

szajcll 

ADD 

TAO* 

?NA1CL» 

SAO 

JMP 

SNL 

JMP 

LAC 

DAC 

LAC 

CLL JPAB 

JMP 

LAW 

JMP 



RRN 

RN 

(IBUF) 

IC* 

-20 

CDCOLC 

-9 

CDR5CT 

ICA 

CDRALT 

COCALT 

{7777 

EOF 

COTABL 

COTPTR 

COTLNl 

CDTLEN 

CDTPTR 

COCPTH 

CDCPTR 

t7777 

CD77B0 
ICA 



LAC 
JMP 



CDTLEN 

ILLCP 

CDOPTR 
CDCPTR 
CDTPTR 
CDTLEN 

C0ML4 

4000 

COCPUT 

C1005 
REOCMA 



/COME HERE ON MATCH FOUND 

/ 

COCPNO LAC* CDCPTR 

CmAICll 

TAD CDTA8L*1 

CMA 



/TOP OF INTERNAL BUFFER 
/PTR TO BUFFER 



/CARD COL COUNT 



/GET 

/ALT MODE C12,1,B PUNCH]? 

/YES — TERMINATE BUFFER 

/NO — IS IT AN EOF? 

/YES, 

/NO " TRANSLATE TO ASCII 

/GET TOP OF TABLE AND SET PTR 

/SET TABLE LENGTH 

/CURRENT LENGTH/2 

/CURRENT TABLE TOP + LEnGTH/2 

/GET CURRENT ITEM 



/ADD IN REST OF 2'S COMPLEMENT WORD 
/CURRENT COLUMN 
/MATCH FOUND? 

/CURRENT TABLE LENGTH ■?)? 
/THIS MEANS AN UNKNOWN CARD PUNCH 
/GO OUTPUT 'ILLEGAL CARO PUNCH', 
/L"0 JUMP UP, LBl JUMP DOWN TABLE 

/SET TABLE TOP TO LOWER HALF 

/UPDATE TABLE LENGTH 



/SET HDR WDI TO EOF 
/REQUEST COMPLETE 



/GET CURRENT ENTRY 
/GEN. LEFTMOST BIT 
/ADO 4000001^1 



Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 
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587 

isa 

589 
590 
591 
592 
593 
594 
595 
596 
597 
598 
599 

6«e 

6512 
603 
6^4 
6t»S 
606 
6W7 
608 
609 
610 
611 
612 
613 
614 
615 
616 
617 
618 
619 
620 
621 
622 
623 

e?4 

625 
626 
627 
628 
629 
630 
631 
632 
633 
634 
635 
636 
637 
638 
639 
640 
641 
642 
643 
644 
645 
646 
647 
648 
649 
650 
651 
652 
653 
654 
655 
656 
637 

ese 

659 
660 
6«1 
662 
663 
664 
665 
666 
667 
668 
669 
67? 
671 
672 
673 
674 
675 
676 
677 
678 
679 
68? 
681 
6«2 
683 
684 
685 
68e 
687 



"0171 




75003B 


* 


■^Wl?? 




040407 


R 


9017S 




',40554 


R 


'0174 




900614 


R 


'017S 




100616 


R 


|»017« 




«00057 


R 


»«177 


p 


900571 


R 


fl0?0'l> 





»4"564 


R 


■"W^WI 


p 


140407 


R 


9(11999 


o 


140554 


R 


i»09w:^ 


B 


900605 


K 


«0904 


e 


749010 


A 


««90^ 


p 


745120 


A 


^0?0« 


p 


Kfl0636 


R 


"0907 


p 


9J0673 


R 


"HBPIH 


p 


540674 


R 


00?11 


p 


«00171 


R 


"0919 


p 


500675 


R 


«09n 


p 


:<40676 


R 


W0914 


p 


^4"677 


R 


"0919 


p 


50r)i4?B 


R 


ffl091« 


p 


90*572 


R 


00917 


p 


06"70t9 


R 


O'09?l« 


p 


90"573 


R 


«09?1 


p 


'"60701 


R 


fl09?9 


p 


90"673 


R 


"Vlf^y 


p 


744010 


A 


'»09?4 


p 


n4"405 


R 


'09?^ 


R 


7776^0 


A 


'"09?« 


P 


ntafif^V 


H 


"0927 


P 


9003^1 


R 


"09:^0 


P 


"4"3?7 


R 


0091^1 


P 


90i»5f6 


R 


"0939 


P 


74409H 


A 


009?:* 


P 


04[!l556 


H 


"0934 


P 


90040b 


k 


00935 


P 


440405 


" 


"09:^« 





74/109*1 


A 


"»»37 





'»4"406 


R 


«0940 


P 


920406 


R 


"0941 


P 


741410 


A 


00949 


P 


74:^030 


A 


"094:^ 


P 


74009B 


A 



XOR 


CDTABL+1 


RAR 




COCHUT OAC 


C0RMD3 


CDCLAk> LAW 


-7 


DAC 


CDR7CT 


COCRLl LAC 


CDRwn3 


RAL 




OAC 


CURM03 


LAC 


CDRWD2 


RAL 




DAC 


CDRWD2 


LAC 


CORWOl 


RAL 




DAC 


CDHWOl 


TSZ 


CDR7CT 


JPIP 


COCPLl 


ISZ 


ICA 


ISZ 


CDR5CT 


JMP 


COML? 


LAC 


COWDCT 


TAD 


(2 


DAC 


CDWDCT 


snA 




JMP 


CDVER2 


LAC 


CDRwn2 


CLUJRAL 




DAC 


C0RWD2 


LAC 


CDRKOl 


RAL 




DAC* 


X13 


LAC 


C0RWD2 


DAC* 


X13 


ISZ 


CDCOLC 


JMP 


CDRM5 


.ENOC 




.IFOEF 


UC15 



/RESTORE SIXTH BIT 



/PUT IN TOP OF 3 NORO SHIFT BLOCK 



/C0EWD3,CDRWD2 S CDHWDl SHIFT AS A UNIT USING 
/THE LINK TO PASS BITS FROM WORD TO WORD 



/POINT TO NEXT CARD COL 

/HAVE WE PROCESSED 5 WORDS? 

/NO GET ANOTHER ONE 

/YES " UPDATE WORD COUNT AND 

/CHECK TO SEE IF WE HAVE OVERFLOWED THE 

/USER'S BuFFFR 



/YES - 

/NO — 



. WE HAVE OVERFLOWED 
INSERT 5/7 WORDS IN USERIS BUFFER 



CLAJIAC 




DAC 


POST 


DZM 


COON 


LAC 


TCBP 


Jns 


COIU 


JMP 


WFTGR 



/STORE FIRST WORD 
/STORE SECOND WORD 



/ IN THE CASE OF THE UNICMANNEL, WE RECIEVE A 42(10) WORD 

/ BUFFER. THE FIRST WORD IS A BYTE COUNT CNOW ALWAYS 80tl0n. 

/ NOTE THAT AN EOF CARD HAS A BYTE COUNT OF IJ J 

/ SPOOLER DOES CHECKSUM CALCULATION, NOT US, 

/ THE SECOND IS A CHECKSUM SO ENTIRE BUFFER ADDS TO 

/ UJ<»««MODULn 2a16 THAT IS###in. THEN ARE 40C105 WORDS 

/ OF ICOMPRESSED COLUMN'. CSEE CR-11 DRIVER MANUAL3. EACH 

/ WORD HAS Two EXTRANEOUS BITS AT LEFT, THE iSECOND CHARl 

/ OF THE PAIR, AND FINALLY THE FIRST CHAR OF PAIR AT RIGHTMOST 

/ OF WORD. ThF POP-ll HAS ALREADY CHECKED FOR VALID PUNCH 

/ COMBINATIONS C84 VALID CARD ASCII, PLUS 12-1-8 FOR ALTMODE) , 

/ 

/SET VARIABLE SAYBING WE'RE WAITING FOR 

/INTERRUPT 

/AND SAY WE HAVEN'T GOTTEN IT YET 

/AOOR OF TABLE TELLING POP-ll TO READ CARD 

/ROUTINE TO SEND REQUEST TO PDP-11 

/WAIT FOR COMPLETION INTERRUPT 

COME BACK HFRE WHEN CARD IS READ 

/RESTORE RN NODE 

/CLEAR INTERRUPT FLAGS 
/BEST TO CLEAR POST FIRSTl 
/EVENT VARIABLE FROM PDP-11 
/POP-ll SIGN BIT TO OUR SIGN BIT 
/SKIP IF OK, START CLEARING HIGH BITS 
/GO CHECK WHICH KIND OF PIREX ERROR 
tIBUF*2 /GET FIRST CHARACTER PAIR (2 WORD HOR) 
tl048ll /SPOOLER USES AN ALT-ALT CARD AS AN END 
/OF DECK CARD, WE SHOULD IGNORE ITU 
/IT WAS ONE, JUST READ THE NEXT CARD 
/I2.11i0 PUNCHES IN FIRST COLM.«EOF 
/IF IT IS ONE, MAKE A 1005 
/WELL, IF SO GO LACE 1005 AS HEADER 
/EOF CARD, JUST SET HEADER, 
/SETUP X12,X13 FOR USER BUFFER 
/MANIPULATIONS. X12 HEADER POINTER 
/X13 DATA POINTER 



/DATA STARTS AT BUFF+2 

/TOP 17 BITS ADDRESS, LAST IS RIGHT-LEFT FLOP 

/TO GET INCOMING CHAR'S 

/•0 CHAR'S 

/NOTE WE USE COUNTERS OIFERENT ALSO 

/INIT 5/7 PACKER TO EXPECT 

/IST CHAR OF A BUNCH OF FIVE 

/WE USE AS COUNT OF PAIRS, NOT WORDS 

/SO DIVIDE BY TWO 



CDRML2 



LAC 


RRN 


OAC 


RN 


nzM 


POST 


DZM 


CDON 


LAC 


EVll 


RTL 




SPAlCLLiRAR 


JMP 


CDUCEC 


LAC* 


tIBUF*2 


SAD 


tl048ll 


JMP 


RETRY 


AND 


(340 


TAD 


C445 


SAO 


tlB05 


JMP 


REQCMA 


LAC 


TX12 


OAC* 


tX12 


LAC 


TX13 


OAC* 


rxi3 


LAC 


tIBUF+2 


clljRal 




OAC 


CDIPTR 


LAW 


-120 


DAC 


CDCOLC 


LAC 


PAKI 


OAC 


PAKSW 


LAC 


CDWDCT 


CLLIRAR 




OAC 


CDWDCT 


LAC 


CDIPTR 


ISZ 


COTPTR 


CLLJRAP 




OAC 


CDTl 


LAC* 


CDTl 


SZL'Ral 




SWHAISKP 


RAR 





/WATCH IT! TOP 17 BITS ADDR, LOW BIT LEFT 

/RIGHT FLIP-FLOP. AND' I POINTER POINTS TO 

/NEXT CHAR, NOT LAST ONE RETREIVED. 

/FLIP-FLOP TO LINK, AOOR AC 

/MOLD POINTER IN TEMPORARY 

/GET CHARACTER PAIR 

/THESE THREE GET CORRECT CHAR 

/TO LOW ORDER 8 BITS OF WORD 



Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 

4-23 



686 
689 
690 
691 
692 
693 
694 
695 
696 
697 
690 
699 
7«P 
7(111 
7Pi? 
7H3 
7PI4 
7(115 

7fe 

7f"7 
7I»P 
7«t9 
71l?> 
7tl 
712 
715 
714 
715 
716 
717- 
718 
719 
7?H 
721 
722 
723 
724 
725 
726 
727 
726 
729 
730 
731 
732 
733 
734 
735 
736 
737 
736 
739 
74? 
741 
742 
743 
744 
749 
746 
747 
748 
749 
79e 
751 
752 
753 
75* 
755 
756 
757 
758 
759 
760 
75! 
762 
763 
764 
765 
766 
767 
768 
768 
77? 
771 
772 
773 
774 
775 
776 
777 
778 
779 
7«fl 
781 
782 
783 
784 
785 
786 
787 



•i^HA B 1^i*7f2 k 



nei94^ 

0|gi94ff 
»tl947 

«n99l 

«B9"19 
• B>53 

>gi954 



9494^6 
^4^4^4 
Api)l26ia 
^gi'*7n3 
7492(1 1# 
777771 



»lPI9^T B 74«P^? A 



«PI9«3 
n(l|9K4 

npi9A^ 

"«9^« 
'"01967 

n5i97i» 
III«I971 
«iB979 



Illfl973 
"B974 
W097'? 
«»I97« 
«B977 

«*3»>1 
«W3W9 
^fl3Pi3 
««t3»i4 

«»3"^ 

• B3P7 

nn3ia 
«a3n 

CI«I319 
fl»l31S 
"B314 
««S19 
l»B31« 
•B317 

• »^?9 



9^™7?4 k 

749W?() * 

•»?(I14»'»> W 

74»4!»(" » 

749Wja * 

1^W393 H 

44I>5A(< ff 

«PI»J34 k 

ffei«41(* X 



»4(»nSl 
"69063 
96i|*65 
i»6«f'«7 
'»7»i07l 
'•79B43 
in^p47 
I77<f«t42 
• 6i»Pl57 
123194 
12'«1?6 
1?713li» 
131132 
l3flPS4 
«4'?137 
«i7«P77 
i«5ill2 
11311* 
11^116 
IITIJB 
121122 
«I41(144 

(»5?e«i 

»7315<l 



0*C 

SAD 

JMP 
*ND 

82* 

LA- 
TAD 
D*C 
AND 
TAD 

SKPJCLL 

U*C 

BTR 

TAD 

DaC 

LAC* 

SNL 

SWHA 

JMS 

ISZ 

JMP 

jhp 



f377 /STRIP OTHER CHARACTER 

/AT THIS POINT HAVE CLOHNS 12, U < e> 9,8, 1 -7 

/KHERF 1-7 COOFD IN THREE BITS 

/hOLO 

/ALT MODE SPECIAL CASE, NO WEhAP 

/REJOIN AS SPECIAL CASE 

/IF NINE PUNCH, PECIAL CASE, REHAP TO 8,1 PUNCH 

/COHBO FOR OUR TRANSLATE, SKIP IF NOT NINE 

/ADDED TO '9' RIVES '8' AND 'I' 

/REMAPPED, 

/SAVE, NOh TO MOVE bOTTOM FOUR BITS LEFT ONt 

/POSITION (9 POSITION NOK VACATEDl) 

/THIS DOES TT, LEAVING LOH ORDER BIT ZFRO 

/NOW COLUMNS 12, 11, 8,8, 1-7, ZERO BITJ 

/HIDF TOUR HEAD. CLL FOR COMING RTR.SKIP 

/OVER AUT-MOOE RE-ENTRY 

/INDEX TO ALT MOOfc 

/RIGHT-LEFT TO LINK, INDEx TO AC 
fCOTABL /TABLE ADDR 
COTl 

/GET PAIR FROM TRANSLATE TABLE 

/HERE IS LEFT, IN NORMAL SENSE 



COTl 

CDALT 

COCALT 

-7 

CDTl 
CDTl 
C17 
CDTl 



(2419 



COTl 



PAK57 /6/7/ PACKER (IT STRIPS XTRA BITS) 

CDCOLC /IB? 

C0RML2 /NO 

CDCLOS /VES 



TRANSLATE TABLE 4 GROUPS OF 16 CHAR>S, TWO PER WORD. 8 WORD 
SPACE BETWEEN LAST TWO GROUPS, IN WHICH WE PUT OTHER STUFF 
CONOITIONAuiZEO FOR 826-829 OF COURSE. LEFT HAND CHAR IS FIRST, 



.IFUND DECB26 
CUTABL 1^40861 /BLANK, 1-PUNCH 
/2-PUNCH,3-PUnCH 
/4,5 
/6,7 

/«,9(0RDERED AS 8-1] 
/«-2,8-3 
/|-4,e-5 
/•-6.8-7 
/0,0-l 

/a-2,e-3 

/a-4,0-5 

/0-6,B-7 

/e-6,e-9C0RDERED AS 8-8-1} 

/0-8-2, 8-8-3 

/0-B-4,B»8-5 

/8-6-6,B-8-7 

/H,ll-1 

/U-2,11-3 

/ll-4,ll-9 

/ii-e,ii-7 

/n-9,ll-9C0RDERE0 AS ll-B-li 
/11-8-2, 11-8-3 
/11-8-4, 11-6-5 
/11-8-6, 11-8-7 



StW^9^ P wpn^p^f A 



• ((:»l?4 B "i?«7»'S « 
flPf^pS B 7AA?7^ A 



062863 

064065 

066067 

078071 

072043 

100047 

075042 

060057 

123124 

125126 

127138 

131132 

135054 

045137 

076077 

055112 

113114 

115116 

117120 

121122 

041044 

092031 

073134 

.ENOC 

.IFDEF DECe26 

840061 

062063 

064065 

066067 

070071 

137075 

100136 

0471^4 

060057 

123124 

125126 

127130 

131132 

073054 

050042 

043045 

055112 

113114 

115116 

117128 

121122 

072044 

052133 

076046 

.ENOC 



NOW THE 8 LOC. BREAK IN THE TABLE 



COTABL 



THE 5/7 PACKER, A LITTLE TRICKY PAKSW KEEPS A PC WHICH 
iREMEHBERSt WHICH CHAROCTER OF 5 WE ABE AT. TO INIT PACKER, 
SEE TWO LiNFS OF CODE AT PAKINT. NORMAL 'FLUSH' OUT WOULD 
BE TO SEND NUL CHAR'S UNTIU PAKSWiPAKI, IN THIS 
HANDLER, Past HISTORY SAYS WE TRUNCATE ALWAYS AT A WORD 
PAIR BOUNDARY, EVEN FOR SHORT BUFFERS. I AM AFRAID TO 
CHANGE THIS, EVEN THOUGH I DON'T LIKE IT. 







AND 
CLL 



:i77 



/CALL WITH CHAR IN AC, (DESTROYED) 

/PUSHES CHAR'S THRU X13, EARLY END CHECK 

/IN CDWOCT, 

/STIP XTRA 

/FOR ALL ROTATES AND SWAPSl 



Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 
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788 fflw:^?* P »«2'»3?7 W JMP* P*KSH /TO WHATEVER ACTION THIS CHAR. NEEDS. 

789 i»!»-<?7 B T^tXlMH A PAKSW HUT /POINTER TO ACTINS FOR CHARACTER 





JMP* 


PAKSW 


HUT 




JMP. 


PAKI 


PAKST 


PAKT 


VI 



79p noni^m P «2ni35>3 R JMP« PAK57 /THAT'S AUL, OUT 

791 fflW^SI ™p(r"345 R PAKI PAKST /INIT PAKSW FOR FIRST CHAR. 

792 n(^:^39 P mnwpP'ki A PAKT PI /TEMPORARY FOR PARTIAL WORDS 

793 / 

794 / REST OK TRANSLATE TABLE 

795 / 

796 .IFUND DeC02'! 

797 iitnj:^ o tiKitfi A a^eici /i2,i2-i 

798 '<^^■^^^ p 1PI91C3 A 1021^3 /12-9,t2-3 

799 "Itl-*:^'^ P 1Pdl!»5 A 1041«5 /12-4,12-5 
8B0 «t^^:^<^ d idikiiti/ a 1B6i07 /l2-fi,12-7 



■^ 51133 


B 


■»4R11»1 


'^^■^3^ 


P 


1PI91C3 


''MIS^ 


P 


1Pdl!»5 


««:«3* 


P 


1 W^IPI/ 


'^'^■^^^ 


p 


1 I'll! 


"la-Moi 


O 


<3''??<' 


ffM^ 


P 


i«7-4(»?5H 



801 ini-^37 p ll'nl * 110111 /12-8, 12-9tORDERE0 AS 12-S-n 

802 fa-itoi o (3T??fi A 133056 /l2-'»-?, 12-8-3 

803 iiffi^i^ P i>7-40?50 A 07405DI /12-8-4, 12-8-5 

804 oi(»:^49 P- »53136 A 053136 / 12-8-6, 12-8-7 

805 .ENDC 

806 .IFDEF DEC026 

807 0b3lBl 

808 102l«3 

809 1041id5 

810 106107 

811 110111 

812 077056 

813 051135 

814 074041 

815 .ENOC 

816 «034:^ P I7'i000 A 175000 /ALT MODE, FOR BOTH PUNCH SETS. 

817 / 

818 / NOW REST OF 5/7 PACKER 

819 / 

820 00:^44 P 10W3?7 R PAKQ JMS PAKSW /5TH CHAR WRAP BACK TO 1ST. JMS TO PAKSh 

821 / /LEAVES ADDR OF ACTION FOR IST.l. 

882 ati-%m P 749010 A PAKST HTL /IST CHARACTER ACTION, MOVE TO LEFT OF WORD 

823 mtlM^ P 74?030 A SWHA 

824 i»0l4T P n<4i»332 R DaC PAKT /HOLD AS PARTIALLY ASSEMBLED WORD 

825 00^50 P 100327 R JMS PAKSW /LEAVE POINTER TO 2ND CHAR 

826 / 

827 00351 R 74?0)0 A RTL /2ND CHAR ACTION 

828 003'S9 P 74S010 A RTL 

829 OIVIMT, P 940332 R XOR PAKT /MARGE WITH FIRST 

830 •»0:^54 P ')i40332 R DAC PAKT /WAIT FOR PART OF 3RD TO FILL WORD 

831 0035'' P 10'«3!'7 » JMS PAKSW /LEAVE POINTER TO THIRD 

832 / 

833 0035« P 749028 A RTR /3RD, TWO PARTS, FIRST IS TOP 4 BITS 

834 00-^57 B 74»090 A RAR /RIGHT JUSTIFIED 1ST WORD OF PAIR 

835 103S0 P 040327 R OAC PAKSW /VERY-TEMPORARY IN HERE 

836 00:^61 P '5006«4 R AND tl7 /ZAP OTHER BITS 

837 00:^69 P 940332 R XOR PAKT /COMPLETE 1ST WORD OF PAIR 

838 00-<6-< B '"60013 A DAC* X13 /PLACE IN USER BUFFER 

839 lia^f^A P 90'»32' R LAC PAKSW /GET BACK THIRD CHAR CLINK STILL OK H JJ 
84CI ««3Sf! P 740090 A RAR /2ND JOB, LOW THREE BITS OF CHAR TOP OF 

841 n03«« P !^0»707 R AND (700000 /2N0 WORD OF PAIR 

842 003^7 P 040332 R DAC PAKT /WHEWl, HOLD THAT IN PARTIAL WORD 

843 5(0-<70 P 100327 R JMS PAKSW /LEAVE POINTER FOR FOURTH 

844 / 

845 "0371 P 7490311) A SwHA /4TH, SNUG UP TO 3 BITS ON TOP 

846 npi379 B 74(»090 A RAR 

847 00373 P 94ni332 R XOR PAKT /TOGETHER 

848 00374 P :«4n332 R DAC PAKT 

849 »0'^7'5 R 10i»327 R JMS PAKSW /LEAVE POINTER FOR 5TH 
8SM / 

851 0017* P 440566 R ISZ CDWDCT /OVERFLOW SHORT BUFFER? 

852 00377 P 741010 A SKPJRAL /NO, RAL LEAVE XTRA BIT OF PAIR ON RIGHT 

853 00400 P fi0i>452 R JMP CDVER2 /UH-OH, GO CORRECT 

854 ■ 004011 9 940332 R XOR PAKT /COMPLETE 2N0 WORD OF PAIR 

855 00409 P 0S0013 A DAC* X13 /PLACE 

856 00403 B «00344 R JMP PAKQ /GO PLACE PAKSW FOR FIRST CHAR OF FIVE 

857 / 

858 00404 P i>00211 A CDALT 211 

859 0040^ P 8100000 A CDIPTR /POINTER TO INPUT DATA IN INPUT BUFFER 
8«0 / /FRMAT. LOW BIT RIGHT-LEFT FLIPFLOP 
861 / /TOP 17 BITS ADDRESS 

882 aataH 9 «»pffl(»00 A CDTl /TEMPORARY FOR TRANSLATION 

863 004C7 P 51(110000 A POST /B WHEN NOT WAITING FOR INTERRUPT, 1 WHEN YES, 

864 .ENOC 

865 / THE Buffer has been remapped — store a icr' in the trailer 

866 / WORO AND SET UP THE HEADER WORD 

867 / 

866 011)14101 p 90i»710 K CDCLOS LAC C64M00 

869 004)1 P ™6'»0l3 A DAC* X13 /SET 'CR' IN USER BUFFER 

B7((i 00419 P 90OI56H R LAC CDCDLC /CDCOLC IS NEGATIVE 

871 00413 P 723022 A AAC 22 

872 00414 P 744000 A CLL /ROTATE INTO PLACE 

873 ■"0415 B «40711 A ALS 11 /SHIFT INTO POSITION 

874 «C!I41<« 9 ■^i'?l5^t R TAD CDRVAL /ADD IN BUFFER OVERFLOW IF ANY (BITS 12 

875 001.117 P 7230102 A AAC 2 

876 004?a P 0160012 A REQCMA DAC* X12 /SET HEADER WORD ONE 

877 00421 R 777777 A RfcDCOM LAW -1 /SET RRN, SAYING NO MORE READ OUTSTANDING 

878 I1ICI499 P '•401571 R DAC RRN 

879 00423 o 75003H A REQCMP CLAJlAT 

8«0 00424 S 10'»496 R SEV JMS SEVRN /SUB, TO SET EV, RETURN NQDE 

8Bl 00149!^ B if^niffiK?! R jMP PO /GO LOOK FOR MORE WORK 

882 / 

883 / 

884 / SEVRN 

885 / 

886 / 

887 / ROUTINE IS CALLED WITH VALE FOR EV IN AC 



Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 

4-25 



WHiCS? 


e 


777776 


n<^/iKy 





isi>7t"l 


"W«fid 





i'6i7(»l 


»W«fi«i 


c 


St!"/! « 


'>!ft^K 


Q 


•'4i3'5fiS 


»M^!S7 


D 


•P'^IM 


"^if," 


O 


777771 


"iSflRI 


S 


«0f aPd 


'"rti«9 


e 


7777'^'! 


''Ol^fflX 


D 


<!7"<J9ll 



LAW 


-2 


T»D« 


(X131 


DAC* 


(X131 


L*C 


tbPi) 


D*C 


CORVAL 


.IMP 


CJCLOS 


LAI4 


-7 


JMP 


SEV 


LAW 


-30 


JMP 


stv 



SSe / THE NODE »OnR. IS IN RM 

869 / 

B9«l / tV IS SFT. SIGNIFICANT EVENT DECLARED, lOCO ODOE, NODE RETURNED, 

891 / 

892 n;t4pft p ffintiva A SbVHN M 

893 »Vli97 P T2?Oi»0 A PAL /SAVE AC VALUE 

894 eifitji'' P 9P>l)>5fl4 K LAC RN /NODE ADDR 
89» 0151431 P •fi'efSl R DAC* (R2 /SYSTEM ARGUItNT HOLDER 
H96 '«pi43? o ■i49ift*«3 » TAD XAOJ /ADJUST FOR PREEStNT PAGE 

897 «(il4SS B 7?15i»B A PAX /FOR XR ADDRESSING 

898 "Viiii P 91i>P'5<C> A LAC 6,X /EVtNT VARIABLE ADDRESS 
8O9 0IB43* 741??0 A SNA /SKIP IF REALLV ONE 
«(»H fllOl4^« P «»1443 R JMP NOSET /NDPE, SO DON'T SET 
9(«1 '»«I4:^7 P Itf'S^J R TAD XAOJ /MODIFY IT FOR ADDRESSING 
91»2 1ICI440 P 721(!ll»(« A PAX 

9PI3 I>n441 P 730CP1H A PLA /BRING RACK SETTING VALUE 

9H4 '•0(449 9 '«5l>fP'i' A DAC 11,X /TMtRE IT GOESl 

9B6 !»«44-< P 9(«'»711 H NOSET LAC (4III1H0B /DECLARE A SIGNIFICANT EVENT 

91«6 ntfu^A o 7iiiH"il?4 A ISA 

9«7 ■»;>4^i? P 9[»™7(»« R LAC tPOOL /GIVE NODE TO POOL 

906 "151448 B i'fi'»«4; R DAC* CRl /SYSTEM ARGUMENT REG 

9519 1IPI447 D 1?'i7l2 H JMS* (lOCD /DECREMENT 10 COUNT 

Slf« '"5145" P 17'>713 K JMS* (NADD /GIVE BACK NODE 

911 npia-SI P «?'»4?t) k JhP* SEVRN /THAT/S IT 

912 / 

913 / 

914 / 

915 / ••*♦♦ BuFFtK OVERFLOW 

916 / 

917 »(il4'i9 o 777776 A COVER? LAW -2 /BACKUP USER Bl.lFFtR PTR 
918 
919 

<rf?P »W4rs«; o 9t!'«714 H LAC tbPI) /SET OVERPLOW BITS P OR USE BY CDCLOS 

921 
922 
923 

924 "VHf," o 777771 4 EVM7 LAW -7 /ILLEGAL DATA MODE, 

925 

926 "^tfit o mT'tf A EVM3<" LAW -j0 /I/O PARAM. PUT HP PAWTITION, 

927 

9?e / 

929 .IFUNO UClb 

93» / 

931 AtVM6 LAW -6 /ILLEGAL FUNCTION. 

932 JMP SAfcv /SET ABORT fcV. 

933 / 

934 /ON ILLEGAL CAPD PUNCH, WAIT FOR REAOER NOT READY FOLLOwED BY 
93!S /HEADER READY SEUUENCE BEFORE READING ANOTHER CAHD. 

936 / 

937 ILLCP LAC CeRH>iG2) /TYPE 'ILLEGAL CAHD PUNCH'. 
93fi IMS TTYOUT 

939 JMS WF.SW /WAIT FOR REAOER NOT READY. 

94V WFOFF /PSUEUn TNSTR. FOR wF.Sw. 

941 JnS WF.SW /WAIT FOR READER READY. 

942 WFON /PSUEOO INSTP. POH wF.Sh. 

943 JMP RETHY /READ ANOTHER CARU. 

944 / 

945 / SUBk. TO WAIT For RtAUER NOT READY OR READY FOR RtAU 

94^ / PER PSIIEDO INSTR. IN CALLING SEUUtNCE. AFTER HAWK TIME REQS., 

947 / THE TRIG. EV. IS CHECKED FOR Aw ABORT RED. IN THE QUEUE. 

94»< / IF TASK RED, HEAD IS TO BE ABORTED, THE SUBk. DOESN'T 

949 / RETURN NORMALLY, BUT EVENTUALLY JUMPS TO CDABRT. 

9*<v I CALLlNR SEOUENCF: 

951 / 

952 / JhS wF.SW 

953 / PSUtn. INbTk. (WFOFF OR wFUN) 

y54 / SUHR. RETURN ,1F NO INTERVENING AtiORT FOR THIS TASK. 

955 > 

956 Wh.bw !» 

957 LAC* wF.S<l /GET HSOEOO InSTR. 

958 "*C PVl 

95S ISZ WF.SW /BUMP EXIT. 

96J. WF.SWA CRRS /READ CARD READER STATUS. 

gfl AND (2«l) /CHECK FOR READER HEADY FOR REAP. 

gpg PVl XX /SKA OR SZA. rREAOER RtAOY IF NON-ZEHO AC), 

963 JMP* WF.SW /EXIT. 

964 CAL MTCPfl /MAkK TIME FOR WAIT. 

9P5 CAL WFEC8 /WAIT FOR MARK TIME INTERVAL. 

966 nZM fV 

967 LAC TG /CHECK FOR ABORT REU. IN QUEUE. 

968 RTL 

969 SNA /ABORT REU.? 
971, JMP Wh.SWA /CHECK AGAIN. 

971 DZM TG /YES. OEUUEUE ABORT REQ. 

972 LAC POVNA /POVL NODE AtlDP. 

973 DAC* (Rl) 

974 JMS* (OOHri) /DEQUEUE A8RT. REQ. Rl , R2, R4, R5, R6 , XR , AC 

975 NOP /ALTERED. ASSUME AURT, REQ. IN OUEUE. 

976 DAC RN /SAVE ABORT REO. NODE AOOR. 

977 TAD XADJ /SET XR. 

978 P*** 

979 LAC 6,X /GET AHBT. REQ. EV. 
9«f DAC ARE 

9f4i LAC 5,X /CHECK Fflk ZERO LIIN. 

9«2 

9H4 JMP AEVM6 /tPRTR. NON-ZERO LUN, 

9gt, L*C e,X /GET STL. NODE PTk. AND CHECK AGAINST 

jigj SAD STLA /READ REQ, STL NODE PTR. SAME? 

gi,7 JMP CDARD /YES. ABORT READ RtQ. AND CLEAN UP. 



/BITS Pi-B 
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9*8 L*C POVNA /NO. CLEAM 'JP QUtUfc OF TASH TO St A8f(T£0. 

989 OAC* Cwn /ALSO BETR. AdRT. RfcO. NODE TO pnOL AND 

99?' LAC RN /UECR. TWANSF. PEND, CNT. ABRT, REG, NQOt 

991 fUC* CR2) /ADUR. TO R2. 

992 IMS* (UMTQ) /EMPTY REQ. OUEUE OF ALL I/O 

993 /REO.'S 1A0E BY TASK BEING ABORTED. 
99^ /Rl,R2,R3,H5,R6,XlH,yil ,X13,XK,AC ALTERED. 
995 LAC tn /SET ABRT, REQ. EV TO +1. 
996 

997 LAC ARE /ABORT RED, FV. 

998 

IHll'l 
IBB? 

fcVtNT. 



J""^ ISA /DELLARE SIGNIF 



lians 
iaP7 



lPlt9 



LAC 


POVNA 


OAC* 


cwn 


LAC 


RN 


OAC* 


CR2) 


.IMS* 


(UMTQ) 


LAC 


tn 


PAL 




LAC 


ARE 


TAO 


XADJ 


PAX 




PLA 




OAC 


B,X 


LAC 


(4H1C10M) 


ISA 




LAC 


RN 


OAC* 


Ct*2) 


t AC 


tPOUL) 


OAC* 


CKl) 


JhS* 


rioco) 


JhS* 


tNADOl 


JMP 


MF.SMA 


CLAl lAr 




OAC 


COON 


JMH 


COABRT 


.tNDC 




.tJELT 





/RETRN. ABRT. REQ, NOI>E TO POOL. 



/UELR. TRANSF. PEND. CNT, 
/RETRN. NODt TO POOL. 
/CHtCK AGAIN, 



I'^^l CDAkD CLAllAr /SET CARD DONE FLAG. 

14«12 

"'''* J"*' COABRT /PROCEED wiTH ABORT. 

J 01 4 / 

IMIS 

1H17 / 

'"1* / EXIT REQUEST (FROM TASK 



.REA") 



l«?l^ i^^sfii B 9^«7I»4 « u.tx LAC CPOOL) /RETURN REQUEST NODE TO POOL 

11821 'tifitb'i o '"651647 R OAC* rRll 

1H22 i»Cl46fi o 9?r^564 

1023 l»ii)467 P 'e^esi 

1^55 ««;!^? I 'VJ-,\\ I r*** "°"' /DECREMENT TRANSF. PENDING COUNT 

ICZS «W47t 1?(»713 R IMS* fwinm 

1026 

\l\\ f:*^^ CCCn /CONDITION CODE 1 — CLEAR CONTROL. 

lt)29 
1PI3P 
1P31 
t*>38 ^(»-l75 o ,e^f,s5 K JMS CLEAR /CLEAR DEVICE , WAIT FOR COMPLETION 

1^34^ Z\V. I 'Sill I llf 'r'rlt ^^^^l^^^tl'^ * °""-^" ^'^^"^^ 

1035 

llf? ZV7I P 7,'"?2 ; '?L ""''' ^''"''T T" *SSIGN INHIBIT FLAG 

IBO/ o,M47, P 7piiS?2 A ,INh /INhJBIT INTERRUPTS, 



■"USPS 





777PCW 


■Hn^CIT 





•!l'»5i?b 


CTB^(>4 





74^2(»C 


"iJ^C*^ 


B 


«^:"1 16 


nct^P!* 


e 


9P'»5«7 


'JOI^pT 


•> 


fSnf 4/ 


■«pi*l« 


e 


?(>i^?S4 


-"B-il 1 





-^f-fifil 


"dsl? 





1?»715 



DAEX 


LAC 


CPOOL) 




OAC* 


CRl) 




LAC 


RN 




DAC* 


CR2) 




JMS* 


tiocoi 




JMS* 


CNAOn) 




.IFUND 


UC15 




LAC 


cccn 




CRLC 






CAL 


DCPB 




.ENOC 






.IFOEF 


UClb 




JMS 


CLEAR 




ISZ 


CCPB 




CAL 


CCPB 




.tNDC 






ISZ 


POVTA 




.INh 






OZM* 


POVTA 




.ENb 






CAL 


(lO) 


/ 






/ 






/ABURT 
/ 

CDAbRT 


REQUEST. 




LAW 


17Ml9a 




AND 


5,X 




SZA 






jmp 


EVM6 




LAC 


POVNA 




OAC* 


fHl 




LAC 


RN 




OAC* 


(R2 




JMS* 


CDMTO 



/DISCONNECT 



\tll ZZ'^ I lZll\ : ;'"" ///ENABLE INTERRUPTS. 

'y^'V "(H^oi B nnnfi^i R rtL noil ///cut. 



///ZERO IT 

///EfJABL 

///EXIT 



IC41 

l«4g 
11^43 
1(444 



/HAS TO BE ZERO TO BE OK 

/Sn SKIP IF OK 

/ERROR RETURNEn IP NOT 

/MT THE DEQUE FOR THE ABORTED TASK 

/ABORT MODE 

/THIS RCUTIKE DOES ALL WORK 



)K47 
11)48 
ll?4<^ 

1^1 "5 PI 
1B5i 
1l»5? 
1t»53 
1054 

\'^H / NOKi KAS THIS ABORT FOR AN OUTSTANDING READ? 

1 use / 

1^57 '.ffliSiT D ,c.r-S«4 w LAC RN ,S*f,H IS STL NOOF ADDR 

""•Se fln^l^ O ■»4''^63 K TAPl Vini ,,,0. <c Tr^:. ^t.-,^.. 

tl-SS 

1P«P 

10M ^^-1, ., -i.'ir-r.o K .SAD STLA /SAME ADDR FnR LAST READ DONE 

lnP3 



"ffl'SIT 


B 


5 p r< s « 4 


'"n«;i4 


B 


■»4''563 


nam^ 


B 


7?1(Ftll^ 


«mi« 


B 


?!•'(» I'a 


^iJl^l7 


B 


■!4'1?<f>6 


wnspw 





7fi(pffll 


'•w^?i 


B 


^r.1'493 


1"H"!?9 


B 


94'Sb71 


0|«^?T 


B 


741?P«1 


■•i>";p4 


B 


«1!"»493 


i(»5?^ 


B 


"fipe*?! 


""CT^?^ 


B 


■:>pi7l«4 


«llii^P7 


B 


H6»647 


»»^S(» 


B 


1?'»712 


"0^J1 


B 


12'«713 


««S?9 


B 


75'PlPil 


«e»n?:^ 


B 


n4i»571 



LAC 


RN 


TAO 


XAOJ 


PAX 




LAC 


?-,* 


SAO 


STLA 


SKPiCLA 


!CMA 


Jhp 


REQCMP 


XOR 


RHN 


SnA'Cmi 




JmP 


RfcQCMP 


OAC* 


fh? 


LAC 


tPOOL 


OAC* 


CRl 


JMS* 


ciocn 


JMS* 


(NADD 


CLAJCMA 




OAC 


RRN 


.IFUND 


UC15 


LAC 


(CCl 


CRLC 




.ENOC 




.IFDEF 


UC15 


JMS 


CLEAR 


.ENDC 




JMP 


REQCMP 



/USE AS IDEKTIFIER 



/SKIP IF SAME, SET UP -1 



^." ,..'^' '""'^ " -"'P REQCMP /NOPE, WE'RE DONE, GO GIVE BACK NODE ETL 

^6* ZZl I lVll\ 1 c"' r """ '"''"'• "*'^^=' " '' ^° ^^'° ''O"' I^ PROGRESS 

nil ZZ] B Zllli t f o-^"* '^'^'' " "^"^ ^^ PROGRESS, RECREATE ITS NODE ADDRi 

1C.B6 ^(.np^ B «1!.'»493 h Jmp RfcQCMP /NOPE, JUST COMPLETE 

^6« »™;^^« I IZr.l t ■*^* ^"^ '"'^ ''*" ^°'^E *^'' "" '■"•' SUSPENDED READ 

1069 

l(i7fc 

1071 

1072 

1073 

1074 

1076 

1076 

1077 

1078 

1079 5l(1f?S4 P ,051625 H jMS CLEAR /ANU CLEAR FOR UNICMANNEL 

Jeop cunr 

10*1 (»0*:(^ P «f(i»493 R 

10«2 / 

1083 / 

1084 / 

1085 / 
'^*6 .EJECT 

Figure 4-2 
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/SET READ NOT HERE SWITCH 
/CLEAR DEVICE 



/DONE 



|55e ' INTERRUPT SERVICE ROUTINE 

1088 ' 

1090 •J!<»3« B (iipotli"^ » INT 

1091 •"1S7 R 7077«2 * 0B» 

1099 fllB'^ini B ««I»0»I0 H 0*C ST*RT /S«V6 »l. 

1893 .IFUNO UC15 . „ ^^ 

}?:' CRRS /RE*D STATUS INTO *C. 

}2?f D*C EVI /SAVE FOR TASK LEVEL PROCESSING. 

;|,g AND t2) /CARD 00NE7 BIT 16. 

JS?' JMP INTl /NO. DON'T CLEAR CARD DONE. 

J'ao OAC COON /PLACE 2 INTO COON TO SAY DONE 



1099 



U34 



1136 
1137 
ll3e 
1139 
114P 
1141 
1H2 



use 



tl54 



1181 
1182 
1183 
1184 
1185 
1186 



LAC 



(CC3? /TE3. CLEAR CARD DONE. LEAVE 



'IJ'*' CHLC /INTERR. AND DCH ENABLED. 

\XL\ INTl CRPC /CLEAR ALL BUT CARD DONE. 

}?! LAC (CC41 /ENABLE INTERRS. DISABLE DCH 

11J'» CHLC /NEEDED SINCE CRPC DISABLES INTERRS. 

1105 ^ .E^OC 

}}b7 .IFOEF UC15 

1106 P.0^41 B 70B124 A CAPI /CLEAR FLAG FHOM POP-11 
JJ«Q V^<,\\ p ^«»4^7 R LAC POST /ARE NE WANTING AN INTERRUPT 

t' "" ' P ': - " SNA /SKIP IF VES/USE VALUE TO SET 

.... aa.!a e .Oic^ll H JHP INTAC /NO DO NOTHING 

2 Z^^ o "4-5'i R DAC COON /AS FLAG TO DISTINGUISH CARD DONE FROM CAL 

3 -"j;i o »4r.562 R D*C TG /AND SET TG TO -AKE UP CAL LEVEL 

111; ^•.47 !»0«7,l R LAC C401-00) /DECLARE SIGNIF. EVENT. 

1116 lomisa B 70t5^4 A ISA 

7 .0.5, B ,0.000 R INTAC LAC START /RESTORE AC. 

**' ■ OHR 



9V^m,m,-^ D «?IP536 R J"''* I''^ 

.EJECT 



lUe '110.5? B 70:^344 A 

U 1 9 
1120 

1121 ' 

,,59 .IFuNO UC15 

IIj' /SUBH. to output error MESSAGES VIA EHBLUN. AC SHOULD CONTAIN 

j|24 /»nURESS OF ERROR MESSAGE HUFFER. 

1125 ' 

1156 TTYOUT pi , . 

J„ OAC TECPH4 /SET CPB BUFFER ADDRESS. 

I,: CAL TE /TYPE ERROR MESSAGE. 

J:' CAL «FECB /hAITFOR EV. 

1138 JMP* TTYOUT 

JIjJ /error hESSAGE BUFFERS AND TABLE OF PTRS.: 



1133 ' 



ERRPT .^l 



1135 ERRHGl 



ERRMS2 
ERRMG3 
ERRMG4 
ERRMG5 

/ 

/ 

/ 



JJ43 EHRMGl EHRMG2-ERRM6l«lfl00/2*2 

,144 ^ 

:' . .ASCII '••• CO READER NOT READY<<15> 

;J4^ ERRMG2 ERRMG3-ERRMG2*l»eB/2+2 

1147 
1148 



.ASCII •••• CO ILLEGAL PUNCHi<15> 



JI45 ERRMG3 ERRMG4-ERRMG3«10«e/2*2 



.ASCII '••• CO PICK ERR0R'«19> 



Jjjg ERRt'GA ERRMG5-£RRMG4«100e/2*2 



Jl" .ASCII '*•* CO DATA MISSED/PHOTO ERR0Rt«15> 



<iS^ ERRMG5*, 

156 .EJECT 

;j5° / ....* CARD COL TO ASCII TRANSLATION TABLE **♦•* 

I J" /EACH TABLE ENTRY REPRESENTS VALIO ASCII CARD PUNCHES WITH 

1168 ' '•••- ' -o- --- - ■ - 

!|!i /bITS 0-5 SIXBTT ASCII CHARACTER. 

jjjj /BITS 6-17 CARD PUNCHES WITH THE FOLLOWING MAPPINGI 

1 164 ^ 

JJ65 /BIT 6 • ZONE 12 

1186 /"IT 7 ■ ZONE U 

MAT /BITS 8-17 • ZONES 9-9. 

I;!' /THE ASSEMBLER BUILDS THE TWOS COMPLEMENT OF BITS 6-17 VIA THE 

\\Vt /77770*1 OPERATION. THE TABLE IS ORDERED ACCORDING TO INCREASING 

\\yl /MAGNITUDE OF CARD PUNCHES (CONSIDERED AS 12 BIT RIGHT JUSTIFIED 

, ,7, /INTEGER VALUES). 

\\j\ /tXAMPLEI ASCII '9' MAS FOLLOWING TABLE REPRESENTATION! 

1173 ' 
1174 



/ 71000167777*1 



1175 / 

1176 f 

1177 / 



Ijyj /WHERE 0001 INDICATES ZONE 9 PUNCHED AND 71 IS SIXBIT ASCII '9'. 



\V-f\ /GRAPHIC CHARACTERS FOR 026 PUNCHES ARE IN PARENTHESES BELOWJ 

1179 ' 

118a COTABL CDTABl+1 

400000 /BLANK 

710001»7777+1 /9 

700002«7777+l /I 

B7a004«7777*l /7 

CP 340006,420006 /" t») 

6b0010«7777*l /6 
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1187 CP «7apil2,75«ai2 /» C) 

1186 650a2B67777*l /5 

1189 CP 3600122.4701022 /, C*} 

119e 64Hfl40«7777 + l /4 

1191 (ii(iiW042«7777*l /» 

1192 63(»10067777+1 /3 

1193 CP 7b0i02, 43(^102 /« (3) 

1194 62020e<>7777*l /2 
1196 CP 370902, 72B202 /: CJ 

1196 6l04a0«7777*l /I 

1197 60100007777+1 l^ 

1198 321001#7777+1 /Z 

1199 311002«7777*1 /Y 
120H 301004«7777*1 /X 

1201 CP 451006,771006 /? (X) 

1202 271010»7777*1 /W 

1203 CP 431012,761012 /> C«) 

1204 261020«7777*1 /V 

120b CP 421022,371022 /RIGHT ARRDh C") 

1206 251040^7777*1 /U 

1207 CP 501042,451042 /% CO 

1208 241100*7777*1 /T 

1209 541102«7777+1 /' 

1210 231200«7777+1 /S 

1211 CP 73120?, 351202 Hit^ 

1212 571400»7777*1 // 

1213 5b20a0*7777*l /- 

1214 222001»7777+1 /K 

1215 ?120*'2«7777+1 /Q 

1216 202004«7777+l /P 

1217 CP 462ni06, 342006 10 Ci) 

1218 172(il0*7777*i /D 
121S CP 762012,732012 /; C>) 

1220 162020O7777+1 /N 

1221 CP 332022,512022 /3 C C3 

1222 152040*7777+1 /M 

1223 522042*7777+1 /* 

1224 14210007777+1 /L 

1225 44210207777+1 /$ 

1226 13220007777+1 /K 

1227 CP 722202,412202 l\ (:) 
'228 12240007777+1 /J 
122S CP 534000,464000 /& (♦) 

1230 114idi,«107777 + l /I 

1231 10400207777+1 /H 

1232 0740,,!4o7777+l /G 

1233 CP 414006,364006 /» (iJ 

1234 06401007777+1 /F 

1235 CP 744012,534012 /♦ (<) 

1236 05402007777+] /£ 

1237 CP 354022,504022 /( (j) 

1238 04404007777+1 /D 

1239 CP 514042,744042 /< (5) 

1240 (»34<00o7777 + l /C 

1241 56410207777+1 /. 

1242 I?24200O7777+1 /B 

1243 CP 774902,334202 l\ (?) 

1244 01440007777+1 /2 

1245 CDTLMl ..l-COTABL/2 

1246 CDRALT 4402 

1247 .ENDC 
'248 .EJECT 

1249 / 

1250 / •*♦** INTERNAL VARIABLES ****• 

1251 / 

1252 00^^54 P "00001 A CDON 1 /CARD DONE FL*G. 

1253 »0'?5S P i»00000 A TST /TEMP STORAGE FOR STATUS. 

1254 n<nn,*,», o 010111000 A STL* /STL NODE, ADOR, 

1255 "0^57 P "00000 A ARE /ABORT REO. EV, 

1256 '!i0il6i» P "0i»000 A CDCOLC /CARD COL COUNT USED IN TRANSLATING CARDS 

1257 10561 P "001000 A EV /INTERNAL EVENT VARIABLE 

1258 »0^«9 P "0"00e A TS /TRIGGER EVENT VARIABLE 

1259 '»0!lfi3 P "0ni000 A XAOJ /XR ADJUST CONSTANT TO SUBTRACT PAGE BITS 

1260 00!S(«4 P »0O'00H A RN /ADDRESS OF THE REQUEST NODE PICKED FROW AUEUE 
12Sl ^0i?6^ "0"000 A CORVAL /BUFFER OVERFLOW FLAG WORD 

1262 00i?«« P "001000 A COWDCT /WORD COUNT CHECK WORD SET FROM I/O REQUEST 

1263 / 

1264 .IFUNO UC15 

1265 / 

1266 / SAVE SOME RnOM FOR UC15, THESE AKE NOT NEEDED 
1287 / 

1268 TCA /INTERNAL BUFFER CURRENT ADDRESS POINTER 

1269 CUR7CT /SEVEN COUNTER USED BY THE 5/7 ASCII PACKING ROUTINE 
127? CDR5CT /COUNTER FOR 5/7 ASCII PACKING 

1271 COTPTR /POINTER TO TRANSLATION TABLE 

1272 CDTLEK' /TRANSLATION TABLE LENGTH 

1273 CD770? 770000 /USED IN CARD TRANSLATION 

1274 CDCHTR /POINTER TO CURRENT INTEM IN TRANSLATION TABLE 

1275 CDRWU3 // 

1276 CDRWD2 // THREE WORD SHIFT REG. FOR 5/7 ASCII PACKING 

1277 CDRWDl // 

127b EVl /CARD READER EV. 

1279 / 

1280 .ENDC 

1281 / 

12R2 0?^(^7 D "0"000 A PUVNA " /PHYSICAL DEVICE NODE ADDRESS 

1283 "0^7" P 30Pip"0 A PDVTA /ADDRESS OF ADDRESS OF TEV IN PHY DEV NODE 

1284 «5i«i71 P 777777 A RKN 777777 /READ BEING PROC. FLAG. -1 IF NOT BEING 

1285 /PROCESSED, READ REO, NODE ADDRESS IF BEING 

1286 /PROCESSED. 

Figure 4-2 
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J287 ■^^*.T> n^npati * TX12 « /TEMP, F0«* X!P STOfi, 

12«6 ?IB^7'^ B f«oinipi5iD * Txl3 ^ /TEMP. FOR XIJ STOS, 

J2«9 "tllT^ oDiffpiPk; * TCWt ? /TEMP. FOR KEQ. WC. 

129C / 

1291 .EJECT 

1292 / 

1293 / ***** C«L PARAMETER BLOCKS .*•*♦ 

1294 / 

129b / 

1296 »«"I71 P '»6lf«?9H A WFTCPB 2?l /WAJT FOR TRIGGER CPB 

1297 r«ji^7* o i^tl^SfiZ R TG 
1291) / 

1299 ^91*177 P »0tlBU A CCPB U /CONNECT CPB 

13Bf! «w^;in D 'owSfll R Ev 

1381 «««B1 P 'B^flS A 15 /LINENUMBER 

1382 oio^ds P «Ci»536 R INT /ENTRY ADDRESS OF INTERRUPT SERVICE ROUTINE 
1 3"3 / 

13«* .IFUND UC16 

13«S / 

13B6 / uCl5 SAVE SPACE BY LEAVING OUT SOME CAl'S 

13B7 / 

13(118 / 

13CI9 / 

131(C MFECB 20 /WAIT FOR EV CPB 

1312 

1313 DCPb 12 /DISCONNECT CPB 

I'JIJ /EV ADDRESS 

1^1* 15 /INTERRUPT LINE NUMBER 

'^'* iNT /CURRENT INTERRUPT TRANSFER ADDRESS 

^''1* Tt 27B0 /WRITE TO ERRLUN. 

1319 

^^l" ERRLUN /WRITE OUT THE ERROR MESSAG TO THE DESIRED 



MFECB 


20 




EV 


/ 




DCPb 


12 




e 




15 




INT 


/ 




Tt 


27VI0 




Ev 




ERRLUN 




2 


TECPB4 


XX 


/ 




MTCPB 


13 




EV 




12 

< 


/ 


1 


WFCRCe 


20 




EVI 


/ 




WFCRCD 


20 




COON 



/TELETYPE 



1321 
1322 
1323 
1324 

1326 MTCPB 13 /MARK TIME REO. 
1326 

1327 12 /j2 UNITS, 
'"'^B 1 /UNIT tTICK), 
1329 

13361 WFCRCe 20 /KAIRFOR CR INTERRS, 

1331 
1332 

1333 WFCRCD 20 /HAIT FOR CARD DONE FLAG TO BE SET, 

1334 COON 

1335 / 

1336 .ENCC 

1337 / 
1336 / 

1339 .IFOEF UC15 

1340 / 

13<l / I/O INFORMATION , ROUTINES , ETC, FOR UC15 

13'2 / 

13*3 / TCB (TASK CONTROL 8L0CKJ TELLING POP-ll TO SEND US A CARD 

1344 / 

1345 neffoi;^ p >«2ft4Pl A TCB APISLT*4a8*APILVL /TELL POP-U WHERE TO COME BACK 

1346 «0ADI4 P (»0m0p.5 A OEVCOD /pirex CODE FOR CD|THE 200 BIT SAYS 

,iy. ' /HE ARE NOT TO BE SPOOLED, 

348 T«*n» \ «SI^S«S \ ^"'^ \ '^^^^^ VARIABLE FROM POPll TO US 

34» 9V,n9*. P «0(»0PI0 A /DUMMY. HIGH PORTION OF 18 BIT 

:,-, . , . ' /ADRCSS, NOT PRESENTLY USED 

lasi nnA(i>7 P BiBCBSil R IBUF /POINTER TO BUFFER TO PUT CARD IN 

1353 '""*" ' ''""""'* * " 'UNIT m% FOR FUTURE GENERATIONS. 

i"i ' TCB TO TELL POPll TO CLEAR OUT CARD READER DEVICE 

1035 / 

1356 nnKii p mni^npiia a tcbk /this works, see pirex for info. 

1357 nd^l? p (^0?6BI0 A OEVCOD»l77*4fl0+200 

1358 »nAi:^ p ijim^ipin a EVIIK /event variable for CLEAR OPERTAION 

1360 / pnTNTFDS Tn Tr«. Tno» 

1361 / - 

1362 019614 D O0i»i6f3 R TCBP TCB 

1363 oi(l|«l«! p IJ0H611 R TCBKP TCBK 

1364 / 

1365 / 

J^^* f CDIU IS THE SUBROUTINE TO SEND A TCB TO THE POP-n 

}22f '' ^^^ '''^TH THE AORESS OF THE TCB IN THE AC 

1369 / 

137(11 gip^jA B f»(ic»(»Cl0 A CDIU (I 

1371 f^,^n\7 p 14»6(»5 R OZM EVll /CLEAR ONE COMING FROM POP-ll 

13/2 <«o.«2(i. p i4i'613 H OZM EVllK /AND THE OTHER ONE, IN CASE IT USED 

WW "'"'"21 " ^P"?"! * SIOA /SKIP IF POP-ll CAN TAKE REQUEST 

13'* «96?9 P «01^P?1 R JMP ,-1 

1375 OI0«?:^ p 7B»«OI>i6 A LlOfi /TELL IT TO 00 TCB WHOSE ADDRESS IN AC 

1376 fflfling^ e «<2ixei6 R JHP* COIU /THATIS ALL THERE IS TO IT 

1377 / 
1376 / 

1'^® ■' CLE*» CLEARS SWITCHES, AND CD IN PIREX, WAITS FOR COMPLETE 

1 380 

1381 

1382 

1363 

1384 

1 385 

1386 

Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 
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• ««2^ R upcupitiB A 


CLEAR 









«B<2« P 149I4W? H 




OZM 


POST 




"f*?? P MOIS*!* R 




DZM 


COON 




OBBjff p 901615 R 




LAC 


TCBKP 


/TCB FOR CLEAR 


!»^«?1 B (psigie R 




JMS 


CDIU 




ipflSS p '«?'»6S4 R 




CAL 


WFCLFR 


/WAIT FOR CLEAROUT 



13*7 «(»«:s-< P «?r»S?5 R JMP* CLEAR 

1388 / 

1389 '»aK^4 P Di{»cin»?0 A WFCLEK 2PI 

1390 aB«3^ o "npineiS R EVllK 

1"1 / COUCEC EXAMINES NEGATIVE EvEnT VARIABLES FROM PIHEX 

1392 / 

1393 WDIUS* 9 'd^PPKi A CDUCEC CLLJRAR /CLE*R OTHER TOP BIT 

1394 B(»<(37 P 34C1I716 R TAD (6000(1101 /SIGH EXTEND TO POP-15 WORD 

1395 i(»*<5i o ^^'^ri^ R SAO (7770101 /THIS ONLr 'LEGAL' VALUE AT PRESENT 

1396 oioHiii a «oic«l71 R JMP RfcTWY /THAT SAYS HIHEX IS OUT OF NODES, 

!"^ ^ /KE SHOULD TRY AGAIN TO GtT ONE 

mi '""''' " '[•''4?6 B JMS SEVRN /OTHERS, RETURN NEG VARIABLE AS EV. 

\lll ' /THIS IS SLIGHTLY FLAKEY, BUT WE 

\,J: , ' /REALLY SHOULD NEVER GET MEREJ717 

\M\ '^ " '^'"' * ^'^ -' 'S*^ ^0 "O^f- ''E*0 OUTSTANDING 

14«2 1*01^4.4 O '^d9lp71 H OAC RRN 

J*'' "'"'"''' " ""'•''^'^ •< ''"P PO /BACK TO LOOK FOR MORE WORK 

1404 / 

1405 / 

14«« .ENDC 

1^^7 t»0!»P!0k! R ,tNl) START 

"^«4« P 7ifl»2P2 A *L 

«0«47 P OI0IH101 A *L 

wn^SB P "0*054 fi' *L 

«0«5l p npipiPg A »L 

"("^S? P ""WISS A *L 

"0*53 P W00010 A *L 

«0«54 p H0W5S2 R ♦L 

staBSfl p '»7''000 A iL 

0|»«S'< P "101)1337 A •L 

H0«57 p "0OI777 A •L 

«0«fi» p aififfipt A «L 

«n««t P '"000?b A •L 

«0««9 p W0!»096 A *L 

00«fi3 P i!i0Ci036 A *L 

l"B«f4 P 00!»017 A ^L 

10*6^ p |»0'«3?5 A *l 

:"0«6« p "00332 A *L 

00«67 P 90070/ A *L 

00«7n P "0ffll03 A «L 

00*7t P ni0'»104 A *L 

00*79 P '>0i»342 A *L 

'»0«73 p "00003 R •L 

'0«74 P 104611 A *L 

09*7^ P 1I0W54B A ^L 

00«7« p 700445 A »L 

00*77 c "01005 A *t 

00700 P "00012 A *L 

007P1 p "00P13 A ^L 

«0709 P "00377 A *L 

'»07ci3 P "0"0?B A *L 

007P4 P "K0?4B A *L 

i>^7?* e "00P73 w ^L 

"077* p ^0"i77 A *L 

"07B7 P 70"000 A •L 

0071"! p "6'«000 A *L 

00711 P 401800 A *L 

00717 P "0"345 A *L 

"0713 P "0"107 A *{, 

i"0714 P "0i»0St3 A *t 

"071* P "n"3Sl A *\, 

"^7i« P «pi"7pie A •L 

"0717 P 777001 A ♦L 

SI7F«007?B NO EkRCR LlNfcS 



Figure 4-2 
PDP-15 CRll RSX-PLUS III Handler (cont.) 
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4.6.3.3 Requests - Following handler initialization, requests can be 
processed. Note that the request de-queuing algorithm (see Figure 4-2 
lines 351-406) is executed whenever Q-I/0 places a request node in the 
list associated with the handler's PDVL node or whenever an interrupt 
for the device has occurred on the PDP-15. The latter condition 
implies that the handler's interrupt service routine (Figure 4-2, lines 
1090-1119) will set the trigger event variable on each interrupt. 



4.6.3.4 ABORT Requests - Because of the nature of the UNICHANNEL 
configuration, ABORT requests should be handled on a high priority 
basis. Hence, whenever the trigger event variable is set, the handler 
should first check to see if an ABORT request has been issued. 
(Figure 4-2, lines 352-356). This condition can be tested using the 
following algorithm: 

LAC TG /GET THE TRIGGER EVENT VARIABLE INTO THE AC 
RTL /MOVE THE ABORT BIT INTO BIT ZERO OF THE AC 

SPA /SKIP IF ABORT BIT IS NOT SET 

JMP PICK /ABORT REQUEST-DEQUEUE AND PROCESS IT 

/NOT AN ABORT REQUEST — CHECK OTHER 

/REASONS FOR HAVING TRIGGER EVENT VARIABLE SET. 



4.6.3.5 Interrupts - If the trigger event variable was not set due to 
an ABORT request, either PIREX has issued an interrupt or a new 
request for I/O is pending. Before checking for new requests, the 
handler should see if an interrupt occurred (see Figure 4-2, lines 
358-361) . If it did, the handler should check to see if an interrupt 
was requested. Unrequested interrupts should be ignored but the 
handler should finish processing the outstanding I/O request if the 
interrupt indicates that I/O is now complete. 

If the trigger event variable was not set due to an interrupt and no 
I/O is being processed by PIREX, the handler can pick off the new 
I/O request and begin processing it (see Figure 4-2, lines 367-406). 

On ABORT requests, the handler should determine if I/O is in progress 
on the PDP-11 for the task being aborted (see Figure 4-2, lines 
1057-1066) . If so, the handler should issue a "clear device directive" 
to PIREX to stop the I/O in progress (see Figure 4-2, lines 1072-1079). 

The "clear device directive" must also be issued whenever a DISCONNECT 
and EXIT request from the MCR function REASSIGN is processed (see 
Figure 4-2, line 1032). 



4.6.3.6 READ and WRITE Requests - READ and WRITE request processing 
usually involves the following procedures: 

1. Checking the range of the issuing task's TCB and buffer. 

2. Making data conform to PDP-11 standards for WRITE requests 
and PDP-15 standards for READ requests. 

3. Sending a TCB directive to PIREX. 
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4. Waiting for PIREX to complete the operation initiated by 
sending the TCB directive. 

5. Checking the event variable sent back to the handler by 
PIREX. 

6. Setting data into the issuing task's request buffer for READ. 

7. Sending an event variable to the task which initiated the 
request for I/O. 

The following is a brief outline of the procedure used by the UNI- 
CHANNEL Card Reader handler when it processes a read request. 
(Refer to Figure 4-2) . 

1. Dequeue the I/O request node (lines 351-406) 

2. Check the range of the task TCB and buffer (lines 439-464). 

3. Clear the TCB event variable (line 1371) 

4. Clear the "I/O Done" flag (line 641) 

5. Set the "Interrupt Expected" flag (lines 639-640) 

6. Issue the READ TCB to the Card Reader Driver in PIREX 
(lines 1373-1375) 

7. Wait for the Trigger Event Variable (line 351) 

8. When the Card Reader Driver has completed the request, the 
Card Reader handler interrupt service routine sets the 
Trigger Event Variable and the "I/O Done" flag (lines 112-113) 

9 . The handler then checks the Event Variable sent back by 
PIREX (lines 652-655) . 

10. Convert the data to PDP-15 card format and transfer it to the 
task's buffer (lines 664-878) 

11. Set the task's Event Variable (lines 879-880). 

12. Wait for the next request (line 351). 

Note that in order for a UNICHANNEL handler to function properly, the 
PDP-11 must be able to access the handler's internal buffers and 
TCBs. Hence, all locations within these TCBs and buffers must be 
within the common memory accessible to the PDP-11.-'- Also, note that 
the RSX POLLER task should be modified to interrogate PIREX concern- 
ing the status of the new device. 



4.7 BUILDING A PIREX DEVICE DRIVER 

A device driver is a software routine that performs rudimentary I/O 
functions. PIREX device drivers typically operate in conjunction 
with more complex PDP-15 handlers. While a rudimentary device driver 
is typical, a PIREX task can be as complex as a full handler. The 



(1) Depending on Driver task design the buffers for an NPR device 
may not have to be in common memory. 
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PIREX XY driver is a good example of a very complex driver. The 
PIREX line printer driver, a typical rudimentary driver, will be used 
to examine the construction of a device driver. 



4.7.1 General Layout 

The general layout of a driver task (see Figure 4-3) consists of: 

1. A stack area which will be used when the task is executing 

2. The address of a device control register. This is used 

to stop the device during STOP I/O requests. Dummy addresses 
are used for tasks which are not device drivers . 

3. A 2-word busy/idle switch used to store the caller's 18-bit 
TCBP. When the busy/idle switch is zero, the routine is 
not busy. 

4. The task request setup/processing section 

5. The task interrupt processor section, if the task is a device 
driver. 

The task request setup/processing section obtains the parameters 
from the TCB and uses them to set up the referenced device or process 
the request. Entry into this section is made from the ATL scanner 
or DEQU with the current task stack area active at the priority level 
associated with that task. All general purpose registers are avail- 
able for use by the current task at this time. The TCBP is stored 
in the busy/idle switch preceding the request section and signifying 
that the task is busy. Once some operation is underway or completed, 
the task returns to the ATL scanner by issuing the 'SEXIT' macro in- 
struction (refer to Section 4.7.2.4). 



If the task is a device driver, the interrupt section is called at 
the completion of an I/O request. All device interrupt priority 
vectors specify priority 7. This is done to save the general-purpose 
registers on the current task stack pointer and lower the system to 
the priority level of this task. 

Control is transferred to the driver, which then checks for errors, 
stores status information into the TCB, clears the device busy 
switch Uhe driver becomes idle when the busy switch is cleared) and 
sends an optional interrupt (via SEND15, see Figure 3-6) to the system 
informing it that the request has been processed. The driver then 
transfers control to the routine DEQU (see Figure 3-7) to determine 
if more requests are in its TRL. If not, control is transferred to 
the ATL scanner, after saving the task stack pointer and setting the 
task status to the wait state in the ATL node. 



4.7.2 Task Program Code 

The task program code is necessary to carry out the task's function. 
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} 



177514 LPCSR«177514 
177516 LPBUF«177516 

eegeee lps*«6 
a0apii2 lpiot»i2 

000(114 LPSTAT.14 
001254 LPtST»LP.EST+4 
001252 LPlJNN»uP.EST+2 
0000(94 I.PTC0DS4 



PIRCX.llS M*CR0-11 VIA PAGE 29 

LINE PRINTER DRIVER FOR LPll/15 

1 

5 

6 

7 

S 

9 

10 

11 

12 

13 

I* 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 

25 

2S 

27 

2B 

29 

30 

31 

32 06316 

33 06416 177314 
34 
35 

36 06420 000000 

37 06422 000000 
38 
39 

40 I 

41 06424 LPl 

42 06424 005037 



.5BTTL LINE PRINTER DRIVER FOR LPll/15 
EVEN 



»ADDR IN PIREX ERROR TABLE FOR NOT READY 
»AOOR FOP UNIT « CFOR NOW 03 
ILINE PRINTER TASK CODE 



MAKE THE POP-15 DO ALL THE "JORK. THE PDP-11 SI«1PlY GET S A COUNT 

OF CHARACTERS To PRINT OUT. HE TREAT THE CONTROL CHARACTERS 

12. IS, AND 14 ONLY. A MINUS CHARACTER IS CONVERTED INTO MINUS 

THAT NUMBER OF SPACES'. NOTE ALL REAL ASCII CHAR'S HAVE A ZERO LEADING BITi 

EaCh line has an TMPLTEO carriage RETURN THAT IS ADDED BY THE DRIVER 

RATHER THAN SENT BY ThE PDP-15 

NOTE, IF HEADE" WORP OF BUFFER HAS" 400 BIT SET, IT IS 
IMAGE HOfE, AND WE wifTHER BUT ON LF OR CRll 

CALL TO ROUTINE HAS ADnRESS OF TCB IN HANDLER BUSY tIDLED REGISTER 



001390 

43 06430 016700 

177766 

44 06434 009060 

000014 

45 06440 016001 

000010 

46 06444 009760 

000006 

47 06450 100403 

48 06452 006301 

49 06454 066701 

171360 

90 06460 112102 1S3 

91 06462 042702 

177400 

52 06466 112767 

000015 

000464 

93 06474 122121 2Si 

94 06476 112721 

000012 

99 06902 132761 

000001 

177779 

96 06510 001403 

97 06912 109067 

000442 

98 00516 000410 

59 06920 122711 3^: 

000014 

60 06524 001409 

61 06926 122711 

000019 

62 06932 001402 

63 06934 009301 

64 0.6936 009202 

65 06540 010267 4St 

000410 

66 06544 010167 

000402 

67 06590 109067 

000402 

66 06954 105737 

177516 

69 06560 052737 

000100 
177514 

70 06566 
06966 000004 

06970 000 

06971 002 
71 

72 ; 

73 I 



.BLOCK 
.WORD 



.WORD 
.WORD 



CLR 

MOV 

CLR 

MOV 

TST 

BHI 
ASL 
ADD 

MOVB 
8IC 

MOVB 

CmPB 
MOVB 

BITS 

BED 
CLRB 

8R 

CMPB 

BEO 

CMPB 

BEO 
DEC 
INC 
MOV 

MOV 

CLRB 

TST8 

BIS 



SEXIT 

lOT 

.BYTE 



8.*EAESTk*4 
LPCSB 



••LP.CL 

LP-2,R0 

LPSTATfRa) 

LPSA*2fR0),Rl 

LPSAfRB) 

1» 

Rl 

mEMSIZ.Ri' 

(R1)*,R2 
«17740n,R2 

•IS.LPFOl 



#12, tRD* 
«l,-3CRn 



3» 

lPeol 

«tl4, (Rl) 
4S 

»i5,(Rn 

4S 

Rl 
R2 
R2,LPBTCT 

Rl.LPBUFp 

LPTAB 

••LPBUF 

«100.#«LPCSR 

WAITST 
0»WAIT5T 



jADDRESS of lPCSR CONTROL STATUS 

I REGISTER USED TO RESET DEVICE 

J ON STOP I/O OPERATIONS. 

;TCB POIInKTER (EXTENDED 8ITS5 

>TCB POINTER (LOWER 16 BITS). THIS 

J WORD IS USED AS THE IDLE/BUSY 

J SWITCH FOR THE DEVICE DRIVER. 

;CLEAR OUT ANY PENDING TIMER REQUESTS FOR US. 

;SETUP R0 TO POINT TO TCB 

JCLEAR STATUS FLAG IN TCB 

jGET BUFFER START ADDRESS 

IDON'T RELOCATE ADDRESS IF BIT 15 

I IS ON. 

;REL0CATE ADDRESS (WORD TO BYTE POINTER) 

J (♦ ll'S DWK LOCAL mEiQRY) 

JCLEAR OUT TOP OF REGISTER 
.•DEFAULT, ASCII, HERE IS <CP> 

;Rl«Rl+2 

;OEFAULT, PRECEED LINE WITH LINE FEED 

;400 BIT SET IN HEADER IF IMAGE 

;NOT IMAGE, CHECK FORMS CONTROL 
lIMAGE, DONiT FORCE CR AFTER MESSAGt 

;ALLOW ALL FORMS CONTROL 
;FIRST CHAR FORM FEED? 

;YE8, DON'T ADO LINE FEED TO LINE 
jFIPST CHAR CARRIAGE RETURN 

fYES, DON'T ADO LINE FEED TO LINE 
fHOVE POINTER BACK TO LINE FEED 
;COUNT ADDITION OF LF TO BUFFER 
ISAVE COUNT 

jSAVE POINTER 

JHISTORY SAYS THIS HERE 
/ENABLE INTERRUPTS TO LP GOING 

(EXIT IN A WAIT STATE AND RESCAN 
J THE ATL NOW. 



Figure 4-3 
UNICHANNEL LP Driver 
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PIRCX.116 MACPO-ll VI* PAGE 3n 
LINE PRINTER DRIVER FOR LPll/15 



1 » 

2 t 

3 006S72 LPINTI 

4 008572 042737 eiC 

000100 
177514 

5 006600 004067 JSR 

173154 

6 006604 000004 4 

7 006606 016700 MQV 

177610 
a 006612 001507 BEO 
D 

10 06614 005737 TST 

177514 

11 06620 100454 BHl 

12 06622 005037 CLR 

001350 

13 06626 UPLOP: 

14 06626 105737 TSTB 

i775l4 

15 06632 100043 qpt 

16 06634 103767 TSTB 

000316 

17 06640 100421 eHI 

18 06642 005367 OEC 

000306 
10 06646 100424 BMI 

20 06650 105777 TSTB 

000276 

21 06654 100406 BMI 

22 06656 117-737 MQVB 

000270 
177516 

23 06664 005267 INC 

000262 

24 00670 000756 BR 
29 t 

20 06672 117767 6Sl MOVq 
000254 
000256 

27 06700 005267 INC 

000246 

28 06704 105267 4SI INC8 

000246 

29 06710 112737 MQVB 

000040 
177516 

30 06716 000743 RR 

31 06720 105767 5»! TSTB 

000234 

32 06724 001403 BEG 

33 06726 116737 mQVb 

000226 
177516 

34 06734 005260 7S! INC 

000014 

35 06740 000417 BR 

36 I 

37 06742 052737 LPSTILr BIS 

000100 

177514 
3S 06750 iiJ0041l ao 

39 " ; 

40 06752 012737 LPERR: MOV 

007064 
001352 

41 06760 012737 MQV 

000170 
001350 

42 06766 112737 MQVB 

000004 
001254 

43 06774 000167 LPXITu JMP 

174270 

44 I 

48 07000 105037 LPXITI ClRS 

001254 
46 07004 052767 BIS 

000340 

170764 



LP INTERRUPT ENTRANCE 
«ll00.#«LPCSR 
R0iR.SAVE 
lP-2,R« 

lpxt 

••LPCS9 

LPERR 
•*LP.CL 

P*LPCSR 

lpsttl 

lPtab 

4S 

lPbtct 

5S 

•UPBUFF 

66 



;DISABLE LP INTERRUPT 

»SAVE REGISTERS 

;TASK CODE 

;GET TCB POINTER 

;IGNORE IF ITS ALREADY BEEN STOPPED BV 
; A STOP I/O REQUEST. 
/CHECK FOR ERROR 

»YES 

»CLEAR OUT ANY PENDING TIMER REQUEST FOR US. 



;IS PRINTER CURRENTLY GOING? 

;VES: FORGET CHAR FOR NOW 
UN TAB EXPANSION TO SPACES? 

»YES 

;DECR CHAR COUNT 

;HEnT to -1, MAKE CR TO FINISH LINE 
»MINUS BYTE IS TAB EXPANSION COUNT 



;I8 ONE, GO SET UP 



•LPBUFF,#I»LPBUF ;STICK CHAR INTO LINE PRINTER BUFFER 



LPBUFF* 

lPlop 

•LPBUFF, lPTaB 

lPbuff 

LPTAR 
#40,#|,lPe)UF 



LPLPP 

lPeol 

7» 

LPEOL,##lPBUF 



lPstatcrb) 
lpxit 

«100.#NLPCSR 



;M0VE POINTER TO NEXT CHAR 

;G0 DO NEXT 

;SET UP TAB COUNT CHInuS, a la 15) 

;COUNT A SPACE FOR THIS TAB 
ISPACE TO LINE PRINTER 



;G0 00 NEXT 
;IMA6E OR ASCII 

JIMAGE, OONiT FORCE <CR> 

;ASCII, HERE IS <CARR1AGE RETURn> 



,"SET REV TO GOOD COMPLETION 



jENABLE INTERRUPT ON LP 



L' XITl jRESTORE R0-k5 anD k(cTusn 
#LPCHk,#kLP.CL+2;AD0R FOR TIMER REQ. 

»170,#i*Lp.CL ;TW0 SECONDS In TICKS (OCTAL) 

»4,»<»LPEsT ;ERROR CODE l, NOT READY TO TABLE 

O^QUt /SCHEDULE NEXT TASK 

••LPFST /INDICATE SUCCESSFULL OPERATION 

*340,p8 /INHIBIT INT. 



Figure 4-3 
UNICHANNEL LP Driver (cent.) 



4-36 



PiREX.lie MACRO-11 VU PAGE 3CT* 
LINE PRINTER DRIVER FOR LPll/15 

47 07012 0eS097 

177514 

48 07016 012701 

000001 

49 07022 019700 

177374 

50 07026 
07026 004767 

174300 

51 07032 LPXT: 

52 07032 052767 



CLR 
MOV 

HOV 

CALL 
JSR 

BIS 



000340 
170736 

53 07040 005067 CLR 

177356 

54 07044 005067 ClR 

177350 

55 07050 012703 MOV 

006424 

56 07054 012701 HOV 

001430 

57 07060 000167 JMP 

174122 
56 
5S 
60 
61 
62 
63 

64 07064 005767 LPCHK: TST 

177332 

65 07070 001427 BEO 

66 07072 005737 TST 

177514 

67 07076 100422 BMI 

68 07100 012702 MQV 

000010 

69 07104 016201 MOV 

001140 

70 07110 012767 MQV 

006424 
177274 

71 07116 042761 BIC 

000017 
000006 

72 07124 012761 MQV 

006376 

000004 

73 07132 006202 ASR 

74 07134 116267 MOVB 

001121 
177252 

75 07142 000402 BR 

76 07144 012710 7$l MQV 

000170 

77 07150 000207 10S: RTS 

78 ; 

79 07152 000000 LPBUFFt .WORD 

80 07154 000000 Lf^TCT: .WORD 

81 07156 000000 lPTABi .word 

82 07160 000 LPEOL: .BYTE 
63 07161 000 lPXTR! .BYTE 

84 I 

85 .ENOC 

86 ; 



••LPCSR 
«1>R1 

lp-s.r" 

SEND!5 
PC,SENni5 



n340,PS 

LP-2 

LP-4 

»I.P,R3 

*I.P.LH,Rl 

qEQU 



ISHUT LP INT. ENABLE 
;TELL CALLER DONE 
IGET TCBP 
fTELL CALLER DONE 

lINHIBIT INTERRUPTS 
;CLEAR BUSYCIDLE] FLAG 

IDEQUEUE ANOTHER REQUEST IF ANY 
; IN THIS DRIVERS DEQUE, 



SUBROUTINE TO FIELD CLOCK COUNT-OOWn 



LP-2 

108 
•«»LPCSR 

7» 

•I.PTC00*2.R2 

aTlnP(R21,R1 

»I-P,LP-12 

»l7,A,TSfRl) 



;have me been disabled 

jif yes, exit. leaving clock disabled 
jerror fixed 

|minus»n0, restart 2 sec. timeout 
;scan atl for our node 



;RESTART AT BEGINNING OF REO, 

|R1 POINTS TO OUR NODE, MAKE RUNNABLE 



l»iP-2e,A.SPCRl) >SET UP STACK POINTER 



r2 jmake byte addressing 

LEVEL(R21,LP-10 jSET up PS 



10S 
#170, (R01 

PC 










>R0 POINTS TO TIMER ENTRY 

IRETURNS TO CLOCK 

;BUFFER POINTER 

JBYTE COUMT 

jTAB LOCATION 

10 IF IMAGE, 15 IF ASCII 

;MAKE EVEN 



Figure 4-3 
UNICHANNEL LP Driver (cont.) 
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4.7.2.1 Code Sections - The program code section of a device driver 
is composed .of three or four of the following subsections (refer to 
Figure 4-3). 

1. Equates, device locations, etc. (Page 29, lines 7-14). 

2. Initialization and I/O request section (Page 29, lines 1-73); 
used to set up and initiate a device operation. 

3. Interrupt section, used to respond to the completion of a 
device operation and to check for errors (Page 30, lines 1-59) 

4. An optional clock wake-up section; used to check the correc- 
tion on an error condition and either retry the offending 
operation or set another wake-up call (Page 30, lines 60-86). 

4.7.2.2 Task Entry — Initialization - When the task is initially 
called, the user stack area is reset. Execution normally begins at 
the first location of the program code. At this point, all general 
purpose registers are available for use by the task. If the task is 
interrupted by a higher priority task before completing the request, 
execution will resume at the point of interruption when program 
control is returned. Various steps in device driver (Figure 4-3) 
initialization include r^ 

1. Clearing out any pending timer requests (if the task uses 
wakeup services). (Page 29, line 42). 

2. Setting up a pointer to the data buffer and relocating the 
pointer value if it comes from the PDP-15 (Page 29, lines 
43-49) . 

3. Various device dependent operations (Page 29, lines 50-68). 

4. Start up the device (Page 29, line 69). 

5. Exit in a WAIT state (Page 29, line 70) until reawakened by 
an interrupt (see Section 4.7.2.4), 



4.7.2.3 Interrupt Processing - An interrupt transfers control to the 
device driver interrupt section at priority 7. Interrupt processing 
(Figure 4-3) is composed of the following steps: 

1. Disable the device interrupt (Page 30, line 4) 

2. Save the interrupted task registers switch stacks and drop 
down to the task's actual priority as specified in the LEVEL 
table. This is all accomplished by a JSR RO, R.SAVE (Page 
30 , lines 5 and 6) . 

3. Test the task busy idle switch to see if the request has been 
cancelled (Page 30, lines 7 and 8). If it was cancelled, 
use the normal DEQU exit without sending a completion message 
to the caller (see Section 4.7.2.4). 



(1) Page number refers to the page number at the top of the PIREX 
listing. 
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4. Perform task interrupt processing and error checking 
(Page 30, lines 10-36). 

5. If a correctable error is detected, set the error code in 
the DEVST table. This error code should indicate a correct- 
able error. The DEQUl return should be used in conjunction 
with a clock wake up call to allow automatic retry of the 
operation (Page 30, lines 40-43). See Section 4.7.2.4 for 
information on DEQUl and Section 4.7.3 for information on 
the timed wake-up. 

6. If a fatal error occurs, the event variable should be set to 
indicate this eror. 

7. If the operation was successfully completed, use the normal 
exit procedure described in Section 4.7.2.4 (Page 30, lines 
45-57) . 



4.7.2.4 Exit Techniques - When a task has finished execution, it can 
exit by issuing the SEXIT macro (exit and change state of task to 
"s"). 

.MACRO SEXIT s 

lOT 

.BYTE 0,s 

.ENDM 

The SEXIT macro allows a task to change status to state "s" after 
exiting. A task state of "0" indicates the task is runnable, a 
state of "2" indicates a wait state, and a state of "4" indicates a 
stop state with removal of the ATL node. Task states must always 
be an even number since they are used to compute a word index in the 
PDP-11. 

There are actually three modes in which a task may exit. In the first 
mode, used on completion of a request, before a task exits, it must: 

1. Zero the busy/idle switch. 

2. Set the caller's Event' Variable to indicate the nature of 
task completion and send an optional interrupt to the 
PDP-15 or the PDP-11. 

3. Dequeue a request from its deque and process it if found; 
otherwise exit. 

Before a task can begin the three previously mentioned steps, it must 
be executing at level 7 (the highest priority level in the PDP-11) . 
As an example, assuming a task name is "XR" (the first executable 
instruction of every task has the task name as its label) , then the 
following program code would accomplish the three necessary steps: 

BIS #340, @#PS; INHIBIT INTERRUPTS 

MOV #?,R1 ;SET CALLER'S EV TO ? (APPROPRIATE VALUE) 
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CALL SEND 15 
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AND SEND CALLER 
AN OPTIONAL INTERRUPT 
TELLING THE REQUESTOR THAT THE 
REQUEST HAS BEEN PROCESSED. 
(A COMPLETE LIST OF EVENT) 
VARIABLE SETTINGS MAY BE 
FOUND IN SECTION 3.2.5.4 



BIS #340, @#PS; INHIBIT INTERRUPTS, 



CLR XR-2 



CLR XR-4 



; CLEAR THE BUSY/IDLE SWITCH ("XR" is the tag 
associated with the first executable 
instruction in the task program code.) 



MOV #XR,R3 ; DEQUEUE ANOTHER REQUEST IF ANY 

MOV #XR,LH,R1 

JMP DEQU ; EXISTS IN THIS TASK'S DEQUE 

IF A REQUEST EXISTS, NO RETURN 

.IS MADE FROM ROUTINE DEQU 

AND THE REQUEST IS AUTOMATICALLY 

REMOVED AND PROCESSED AS IF IT 

WERE JUST RECEIVED WHEN THE 

TASK WAS IDLE. 

This first method is used in the interrupt section upon successful 
completion of a request. The second method is one where the task 
exits from the initialization section (Figure 4-3, Page 30, lines 
46-57) in a wait state using the SEXIT macro, and an interrupt 
routine or other task will complete the previously mentioned three 
steps at a later time. A device driver is typically exited in this 
way (Figure 4-3, Page 30, line 75). The initial section of the 
device driver is used to set up the device controller and begin the 
I/O operation. The task will then exit in a wait state until the I/O 
is complete, the interrupt section is called, the device is shut down, 
and the previously mentioned three steps are done informing the 
requestor that the I/O operation has been completed. 

The third method of exiting is one used either when a recoverable error 
is detected in the interrupt section of a driver and the intention is to 
exit and wait for an error recovery or when another I/O request is issued 
in the interrupt section and another interrupt is expected. This exit 
through DEQUl does not cause the dequeuing of pending reauests but simply 
places the task in a WAIT state. This method assumes that an R.SAVE has 
been performed upon entry to the interrupt process routine. The required 
code to use this exit is: 

JMP DEQUl 
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No registers are preserved by this exit. Control is returned to the 
interrupt section upon occurrence of an interrupt or via the clock 
routine wakeup, to a location chosen by the clock set up section. 
(Figure 4-3, Page 30, line 43) . 



4.7.3 Timed Wakeup 

In the design of a device driver it is useful to include features that 
eliminate operator intervention whenever possible. 

For instance, in the example of the PIREX Line Printer Task, an OFF 
Line condition is handled by retrying the printing every two seconds 
until successful. This is accomplished by using the wakeup feature of 
the Clock Task. This is done by simply placing the return address 
and the time delay into the Clock Table "CLTABL" (See Section 3.3.4) 
Figure 4-3, Page 30, lines 40-41) and the exits using the DEQUl type 
exit. 

When the wakeup call occurs, the clock wakeup subsection specified 
by the return address will be invoked. In this subsection: 

1. Test the task IDLE/BUSY switch to see if the task has been 
shut down. If shut down, a RTS PC return to the Clock Task 
is in order. (Page 30, lines 64-65, 77) 

2. Determine if the error has been corrected. If not, reset 
the timer and RTS PC to the Clock Task. (Page 30, lines 
66-67, 76-77). 

3. If the error has been corrected, reprocess the original TCB 
request and return to the Clock Task. (Page 30, lines 68-75). 
This will cause PIREX to retry the TCB. 

4.7.4 Assembly and Testing 



4.7.4.1 Assembly and Loading - New PIREX device dirver should be 
assembled as a part of the PIREX monitor. Background tasks may be 
assembled separately. 

In the background task case, the user should construct a PDP-15 pro- 
gram to load the background task binary into PDP-15 memory. The 
PDP-15 program must then issue a CONNECT Directive (Section ) 

To start the task, if the task is to execute in PDP-11 local memory, 
two additional steps are required: 

1. Issue a local memory size directive to determine if there 
is enough local memory to accomodate the new task. 

2. Issue a CONNECT directive (assuming there was enough room 
in local memory for the task) . 

3. After issuing the CONNECT directive, use the initial portion 
of the PDP-11 code to move the remainder of the task into 
the local memory starting at the first free location. 
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4.7.4.2 Testing - Since the typical UNICHANNEL system does not have 
a terminal device attached to the PDP-11 processor, the only debugging 
facility present is the console indicators on the PDP-11. An" 
additional aid is the UDMPll paper tape provided with all UC15 DOS-15 
systems. This program provides a destructive dumping facility that 
recovers the entire state of the PDP-11 LOCAL memory and dumps it into 
the LPll/LSll/LVll Printer. (Note: The UDMPll program is an 
unsupported package that can only be used on systems with a printer 
device on the PDP-11 UNICHANNEL Processor) . For tasks executing in 
the common memory, the traditional f Q-DUMP feature of the DOS-15 
monitor should be used. 
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CHAPTER 5 
SPOOLER DESIGN AND THEORY OF OPERATION 



5.1 INTRODUCTION 

This chapter discusses the design concepts of the UNICHANNEL-15 
SPOOLER software and its theory of operation. This information is 
provided to enable the user to understand the SPOOLER software in 
order to add new SPOOLED tasks or to modify existing software. The 
actual modification process is described in Chapter 6 . Flowcharts are 
provided whenever it is necessary. 



5 . 2 OVERVIEW 



5.2.1 SPOOLER 

The word 'spool' and 'spooling' originated in the textile industry. 
During thread manufacture, the threads are wound on small spools by 
first storing them on large spindles and then transferring them onto 
small spools. This entire process is called spooling. In the com- 
puting industry, the term spooling is used to describe the process of 
collecting and storing data on a large high-speed medium and con- 
trolling the flow of this data to slow speed devices. The "SPOOLER" 
is a distinct piece of software that controls the entire spooling 
operations. Spooling permits data flow between a data source and a 
data sink to proceed at independent rates. This feature gives the 
user greater computing power and faster turn-around time because of 
better system resource utilization under an integrated operating 
system. 



5.2.2 UNICHANNEL-15 Spooler 

In the UNICHANNEL-15 system, spooling is achieved by using the dual 
processing capability of the system. The two processors, PDP-15 and 
PDP-11, operate in the Master and Slave mode respectively. The Slave 
processor (PDP-11) controls the entire spooling operation. Data to 
be spooled is supplied by either the master processor (PDP-15) , or by 
tasks running under PIREX. Spooled data is stored on a disk cartridge, 
The Line Printer, Card Reader, and the Incremental Plotter, all being 
UNIBUS devices, are supported by the UNICHANNEL-15 spooler. 
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5.3 SPOOLER DESIGN 

The UNICHANNEL-15 SPOOLER is based on a simple design. Spooling 
of data is done through the RK05 disk. A contiguous portion of 
disk is allocated via SPLGEN for this purpose by the operating 
system on the PDP-15. The starting block number and the size in 
terms of number of blocks is conveyed to the SPOOLER when it is 
issued the 'BEGIN' directive. The SPOOLER allocates and deallo- 
cates this space on the disk through a BITMAP it maintains. The 
spooling and despooling operations of every task are performed 
through a central "TABLE", in which every spooled task has a slot. 
Against each slot there are several entries used to keep track of 
the data during spooling and despooling. Provisions are made 
in the SPOOLER to permit spooling of data regardless of the number of 
blocks occupied in the spool space and the number of buffers in the 
SPOOLER provided despooling operations are going on. This prevents 
system lockout. All the data blocks on the disk belonging to a 
spooled task are linked together by forward pointers stored in the 
last word (377g) of each data block. The end of data in a block is 
indicated by a zero word. Records are assximed to be less than 374o 
words in size. The last block in a spooled file has a pointer to 
the previous file's last block in word 'I'g or a -1 if there is no 
active previous file, if the last spooled file has not yet been 
despooled. Also the last block in a spooled file contains an end of 
file indicator in word '376g' of the data block. Sections 5.3 and 5.^ 
describe the static layout of the spooler. The dynamic layout is 
described in Section 5.5. 



5.4 SPOOLER COMPONENTS 

The following are the major components of the SPOOLER software: 

1. request dispatcher 

2. directive processing routine 

3. task call service routine 

4 . device interrupt dispatcher 

5. device interrupt service routine 

6. utility routines 

7. buffers, TABLE, BITMAP, TCBs 

A brief description of each of the above components follows. 

5.4.1 Request Dispatcher 

This routine dispatches (routes) all requests made by the SPOOLER and 
requests to the spooled tasks. This is done by using the TCN in word 
'1' of the TCB. The dispatcher transfers control to the appropriate 
directive processing routines, in the case of spooler requests and 
to the task call service routine, in the case of requests to spooled 
tasks . 
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5.4.2 Directive Processing Routines 

These routines process directives issued to the SPOOLER to control 
spooling operations. The basic operations are "BEGIN" spooling and 
"END" spooling. These routines may initialize switches, TABLE, BIT- 
MAP, pointers, buffers, set up TCB, start tasks, stop tasks, ... etc. 



5.4.3 Task Call Service Routines 

A task call service routine processes requests addressed to tasks 
running under PIREX. It spools data onto disk in case of output tasks, 
and for input tasks it despools the data from disk. Output tasks buf- 
fer data from several requests into blocks and transfer the blocks to 
disk when full. Input tasks read into core, data blocks stored on 
disk, and unpack the data into the requestor's buffer. Task Call 
Service Routines update the TABLE, pointers, and switches, and use the 
utility routines present in the SPOOLER to write or read a block onto 
or from the disk, get or give a buffer, get or give a TCB, etc. (Refer 
to Figure 5-2. ) 



5.4.4 Device Interrupt Dispatcher 

All interrupts from devices interacting with the SPOOLER are dispatched 
by this routine to the appropriate service routines. This is done by 
using the TCN of the requestor for that task request present in word 
•13„' of the TCB. 



5.4.5 Device Interrupt Service Routines 

These routines handle completion of I/O requests from devices. They 
supplement the driver routines present in PIREX as in the device 
handlers. Besides the disk interrupt service routine, each spooled 
task has its own interrupt service routine. The disk interrupt ser- 
vice routine is made up of the "read interrupt processor" and the 
"write interrupt processor." These are in turn made up of routines 
handling read/write operation for each specific spooled task. The 
interrupt service routine of a spooled task controls the despooling 
operation for output tasks and the spooling operation for input tasks. 
These operations are driven by the table entries which determine the 
end of the operation. Device interrupt service routines update the 
TABLE, pointers, switches and use the utility routines to write or 
read a block onto or from the disk, get or give a buffer, get or give 
a TCB, etc. 



5.4.6 Utility Routines 

Each SPOLll utility routine performs a specific function. They are 

FINDBK Find a free block on disk and set its bit in the 
BITMAP Table (protected) . 1 



(1) Protected routines are those run at priority level 7 
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FREEBK Free the block indicated and reset its bit in the 
BITMAP Table. 

GETBUF Get an unused buffer from the buffer pool (protected) . ^ 

GIVBUF Give the used buffer back to the buffer pool. 

GETRKT Get a disk TCB from the Disk TCB pool. 

GIVRKT Give back the TCB to the Disk TCB pool. 

GETBLK Read a block from disk. 

PUTBLK Put a block on disk. 

GETPUT Get or put a block on disk. 

RESTRQ Reissue a delayed request. 

DEQREQ Tell requestor that a request is done and dequeue 
the next request, if any. 

5.4.7 Buffers, TABLE, BITMAP, TCBs 

Buffers The SPOOLER maintains a pool of buffers in a doubly 
linked list for general use. Buffers are used to 
pack data into blocks to be written onto disk (by out- 
put task call service routines) and to unpack data 
from data blocks read from disk into requestor buffers 
(by input task call service routines) . 

The entire spooling and despooling operation of all 
tasks is controlled by entries in this table. Every 
spooled task has the following entries : 



TABLE 



WORD 0: DEV device mnemonic (set by the BEGIN 
routine) 

WORD 1: CBN current despooling block number (set 
by the despooler) . 

WORD 2: CRP current record pointer (set by the 
despooler) . 

WORD 3: NBN next despooling block number (set by 
the despooler) . 

WORD 4: LSB last spooled block number (set by the 
spooler) . 

WORD 5: LFB last spooled file block number (set by 
the spooler) . 



(1) Protected routines are those run at priority level 7 
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BITMAP A record of availability of disk spooling space is 

maintained in the BITMAP. Corresponding to each disk 
block reserved for spooling is a bit which is 'ON' 
if the block is in use and 'OFF' if free. 

TCBs Buffered blocks of data are read from disk and 

written onto disk using TCBs. Output spooled tasks 
despool data to devices using TCBs and input spooled 
task spool data from devices using TCBs. 



5.5 THEORY OF OPERATION 

This section will describe in detail the flow of control in the 
SPOOLER among the above components. To illustrate this process, the 
spooling and despooling operations of the Line Printer will be dis- 
cussed. The routines in the SPOOLER listing (Figure 5-1) are broken 
up into logic boxes and referenced by line numbers . 



5.5.1 SPOOLER Startup 

Spooling under an operating system on the PDP-15 is accomplished as 
follows. The SPOOLER task should be added to PIREX, by reading 
it into local memory and connecting it at run time via SPOOL 
(SP0L15) . As supplied by DEC, the SPOOLER is a separate binary 
program from PIREX. A special PDP-15 program referred to as 
the system/SPOOLER interface (SP0L15) is responsible for loading 
the SPOOLER into PDP-11 local memory and then issuing requests 
to PIREX to connect the SPOOLER and then begin its operation. 



Subsequently when PIREX schedules the SPOOLER task to run, the "BEGIN" 
request is processed. On gaining control, the 'request dispatcher' 
transfers control to the 'BEGIN' routine. The first time the SPOOLER 
processes a directive it also executes a once only section of code, 
which builds a central address table. This table contains addresses 
of frequently addressed locations in the SPOOLER and is necessary 
since the SPOOLER is coded in Position Independent Code (PIC) and 
thus can be loaded anywhere in the PDP-11 memory. SPOOLER is coded 
in PIC to permit additional tasks to be added to PIREX without neces- 
sitating SPOOLER changes. The BEGIN routine performs the following; 
general startup operations and the specific line printer startup 
operations (Refer to Figure 5-1) : 

GENERAL OPERATIONS - BEGIN DIRECTIVE: 

Set up the SOFTWARE page 7, lines 9-12 

INTERRUPT trap address in 
the PIREX SENDll table 

Save the SPOOLER start address line 13 

in the "disconnect SPOOLER" 

TCB 

Initialize the FINDBK routine lines 15, 38 
switches and pointers. 



5-5 J-37 



DOS-15 V3B000 Update Dociiment 



SPOLll.iaS MACRO-ll V3AB00 PAGE S 
ASSEMBLY PARAMETERS 



12 I CARD READER. AND Xv PLOTTER, RESPECTIVELY 

13 000000 OEVSPP.0 

14 000000 DEVCNTa0 

15 .IPDF $LP 

16 000001 OEVCNTbDEVCNT*! 

17 040000 oeVSPPaDEVSPPiSLP 
IB .ENOC 



1 

Figure 5-1 
UNICHANNEL Spooler Components 



1 

This listing is of the V3A0J2I0 version of SPOLll . V3Bj2l0j2( SPOLll 
contains several differences. Refer to the DOS-15 V3B0j2fj2l Update 
Document for a description of the significant new features. 
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NOTE 



The A assembly errors contained 
in this figure are warning 
messages, and, do not indicate 
actual errors in this example . 



I .sbttl spooler dispatcher 

J £32Z2S S?BEG», 

Z eJ2L'53 .3tOCK 8.»EACSTi<*S 

4 2z:r.i2 ■■^2?ii2 .•^^Z'■'0 duh 

7 eeei^s zi673e 5?sti hov jPST-s.Re jgct tcp aooscss in nz 

:?7772 

8 828152 «)12787 HQV »laeB8fl,8P8T-4 ;fAKC U<S REQ. TO PREVENT GETTING KILLED 

177782 

5 jTHIo IS TO PREVENT STACK BLOW UP THRO' 
<8 JCTL 'C'S PROM PDP-15 

II 38180 B137S7 MQV ••CTUCT, SDCTSV iSAVE CURRENT CTL 'C COUNT FOR LATER CLEANUP 

•iil3i6 
«)a2l32 
i2 28166 Z;i5767 T3T ONCE^L »HAS THIS CODE ALREADY BEEN DONE? 

13 ee:72 Zf'?26 SfiH 88$ ;Yes -- don"t do it again 

li 03174 t:i2737 MOV *»DEVSPP,#»DEVSPL JSET UP DEVICE SPOOLED WORD 

uai264 

15 2^222 AOR JPSEG.Rl IINITALIZB ADDRESSES tPIC CODE) 
02222 612781 ' MOV PC.Rl 

33a<;4 0627^1 ADO «S?3E5-.,R1 
177374 

16 82212 AOa iDRTBL.Ra 
B3213 <;la732 rfOV PC,R2 
i«31i ^r':'7?2 AGO *>Df(TBL-'.|R2 

1? 22^15 i:i2733 MOV l»-iCTC»iT, R3 

<!^2;VJ7 

:S 22222 2n?s22 19S5 iDD fil.CSg)* 'CALCULATE ADDRESSES 

IS 3222>i aZSj^a EEC R3 

23 J5223 k!3i375 8Ni lUS ILQOP UNTIL ALL PINISHED 

21 38232 213722 MOV SUFLiO.RJ ;SET UP BUfPERS 

^ <! 5 7 7 1 

?-A 7^234 i^t;l22 l^l: ADO Rl,t»23* jSET UP POINTERS GOING BACKWARDS THRU 

L;3 2<'2;d i)-j112 *jO fil,*32 

24 ?r,ii3 <;142.'!2 H3V -CR25,R2 

23 27242 .;2>247 CMP Ri.BUPLAO »HEAD OP BUFFER? 

2-^6762 
28 a<:246 0^1372 SNE I'J »N0 -- TRY AGAIN 

27 82252 2ajJ 

26 32253 122753 CMP8 Ji5PCQD*2aa » TCODE CR35 ^SPOOLER REQUEST? 

oJ.-!2!7 
- J ,• 2 i' 2 
2i 7c2ob oOi432 ita 21S 

32 3226i ^'1278: HjV ?C,R1 

31 22262 ^62731 AOO J»0ISP1-.,R1 ; GET DEVICE DISPATCH TABLE IN Rl 
£^3128 

22 38288 88S882 CLR R^ 

53 ; 

34 23272 i2:7S.^ CMP3 «LPCOO, TeODE (RB) >LP REQUEST? 

J '3 2 a 3 4 

33 22275 >;;:i43l BtQ ZH 
3i f 

27 233EJ i^t;722 TST C^Z)* 

3! :33i'2 12c'7>;3 CH?S J»CDCOD, TcOOE CRB) /NO, CD REQUEST? 

cZZZZZ 

35 22313 i!3:424 BEQ Z^S 
48 ; 

4J 82312 <:Z5722 TST (SZJ* 

42 82314 122762 CfiPB ttPLCOS , TfiODE CRa5 »N0, PL REQUEST? 

<;2?336 
<!-a2flJ2 

43 E2322 2a:<:i7 6EQ Z2J 



Figure 5-1 
UNICHANNEL Spooler Components (Cont.) 
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3»0Lti.ia3 H«CRO-ii v3Aaa0 ''age e* 

SPOOLED 3iS?iTCH£» 



44 




> 










45 

46 

47 a?324 




/UNSECOi 


SEISED T4S<< RfOuesT REPORT. 




ei^RORl 










48 22324 


213721 
a2l?3B 




MOV 


••0EV8T,Bl 






49 22333 


2i272l 

<)ii(S55 




iDO 


«SPCnO*S*S«4| 


.Rl 




iC 33334 


i 127 11 
2JB377 




M0V8 


*IO?877,'fRl3 






3: 2Z3«a 






CALL 


OEOREQ 






02143 


224787 
222732 




JSB 


PC,CECReo 






S2 




1 










53 88344 


a'.z7ai 


ZUl 


MOV 


PC.RI 




jSPCOLER RECUE8T »GCT SPOOLER OISPTAI 


54 2a34S 


^■J??22 
242722 




AC3 


•2:3P3«,.Ri 




JTASLE IN #3 


33 ZitSS 




M0V8 


fCCDKtRaj.RS 




;GET FUN, CODE 


55 23358 




3IC 


•i7774fl,R2 








177743 












57 22362 


2e?ie2 


22SJ 


ADO 


RlfR2 




lAOO run. CODE TO Rl 


SS 22364 


451221 




ADO 


tS25,Rl 




JBUILD DISPATCH JlJMP it 


89 22368 

63 


ezeni 


t 


JMP 


(Rn 




/BRANCH TO APPROPRIATE ROUTINE 


61 




ISPOOLES OIRtCTlVE DISPATCH " 


rABLC 


62 e237a 


222!t28 


OlSPei 


9Cg:n 


-OISPB 




IBESINI COOES0 


33 e2372 


177734 




essoR 


-OISPB 




JERROHI CODE-2 


S4 22374 


J2253S 




ENO 


-OISPB 




lENDi CCCE«4 


63 22378 


177734 




ERRDR 


-OlSPfl 




;ERRORi CCOCafl 


66 22422 


177734 




E^ROR 


-DISP0 




lERRORI CODE«10 


67 28422 


177734 




E^AQR 


-DISP0 




fERRORI C00£at2 


38 22^24 


177734 




ERROR 


-DISP0 




{ERROR! C00E>14 


6S 284,38 
73 


«2a7ia 


1 


CONOPR 


-OlSPB 




iCONTINUe HALTED OPERATION 1 COOEalB 


71 




iDEvICE 


RaOUESr 


-DISPATCH TABLE 




72 eS412 


324304 


DISPII 


LPCALL 


-0I5PI 




lUPi LINE PRINTER 
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SP0Ull.i29 
BEGIN DIRECTIVE 

1 
2 

3 
4 
9 
6 
7 
S 



MACRO-ii vSAecse Page r 



000416 

10 00420 

11 00484 

12 00430 

13 00434 



14 

IS 00448 



18 

17 00490 

It 00482 

19 00496 
00496 

80 00480 
00460 

81 

82 

as 00462 

84 00466 
88 00470 

88 00474 

27 00800 
88 00808 

88 00906 

31 

•32 00812 
00818 

33 00816 

34 00820 
39 00822 
38 00824 

37 00830 

38 00934 



39 00948 

40 00946 

41 00880 

42 00994 

43 00860 

44 00964 



010701 
062701 
002716 
013702 
801002 
010182 
000016 
016087 
000014 
012840 

812767 
000001 
001742 

010701 
062701 
177470 

010146 

012641 



016701 
810116 
010702 
088708 
011474 
018703 
000014 
010281 
082708 
800030 
008303 
801373 



016046 
000018 
006218 
008218 
006210 
042716 
000001 
182716 
000002 
016767 
010094 
001698 
016701 
010046 
088601 
010167 
011136 
016701 
010036 
016021 
000010 
016081 
000012 



.SBTTL BEGIN DIRECTIVE 
I 

|THI« ROUTINE STaRTS ALL SPOOLING OPERATIONS. SWITCHES, CONTROL REGISTERS 
lETC, ARE SET . THE BUFFER POOL, TCB POINTERS, BITMAP, TABLE ETC, ARE 
|9ET UPIBITMAP t TABLE ARE SAVED ON DISK(FOR BACKUP OPERATIONS), EACH 
lINDIVIDUAL SPOOLED TASK IS THEN INITIALIZED S STARTED UP IF NECESSARY 
I 
» 



BE6INI 



HOV 
ADD 



PC,R1 
l»OEV!NT-'.,Rl 



|SET ADDRESS OF OEVINT IN Rl 



HOV *<ISEND11,R2 

MOV Rl,8PCO0*2CR2) 

MOV 14(R8),TCB0SA*TCB0I8 



f INITIALIZE ALL SWITCHES 
MOV il,CBTPTR 



ISET SENOn ADDRESS IN PIREX 



ISET CONTROL RE68. 

MOV pC,Rt 
ADD nDum-, 



.Rl 



PUSH Rl 

MOV Rl,-{SP) 

POP -CRD 

MOV C8P)«,«(R1} 

ISCTUP BUFFER POOL 
UNITIALIZE RK TC8 POINTfRS 



2Si 



MOV 

MOV 
ADD 

MOV 

MOV 
ADD 

DEC 
BNE 



RKCAD.Rl 

PC,R2 

«TCB8T-.:R2 

•TCBCT,RS 

R2,{Ri)* 
«30,R2 

R3 

2* 



UNITIALIZE BITMAP 

PU8H NBKCRO? 
MOV 



A8R 
A8R 
AfR 

BIC 

SUB 
MOV 

MOV 

ADD 

MOV 

MOV 
MOV 
MQV 



NBK(R0),.(SP) 

tSp) 
(»P) 
t»P) 
»l,t8P) 

«a.(8P) 

BTMPAD.CmDPTH 

BTMPAD.Rl 

(8P)*,Rl 
RIiBTMPEd 

STBKNA.Ri 

SONtRBJi'CPn* 

N8K(RB),'fRn« 



IGET ADD. OF OUM IN Rl 

jSAVE ON STACK 

} SET SPOOLER CONTROL REG,il 

|GET RKTCBP ADD, IN Rl 
IGET TCBR01 ADD. IN R2 

ISETUP TCBCT TCBIS 

ISET TCBRKl POINTER 
(BUMP R2 TO TCBRK2 



rGET SIZE OF SPOOLED AREA NUMBER 



JCOMPUTE SIZE OF BIT MAP 

|SIZE*NUMBK/8*2 

rGET EVEN NUMBER 



IRESET CNOPTR 

|(BR0112. TEMP FIX) 

lADO OFFSET TO END 
ISET UP BTMPED 

)GET ADDRESS OF STBKNM.4 IS Rl 

fSET STARTING LOCK « 

ISET NUMBER OF BLOCKS 
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IPOLli.iaB' 
IC6IN DIRECTIVE 
49 80870 018708 
000380 

46 00874 010103 

47 00876 008083 
46 00600 008388 

48 00688 001378 
80 

81 08684 016701 

010010 

98 00618 010183 

83 00618 018708 

000044 

84 00616 018783 

177777 

89 00628 009308 

96 00684 001374 

97 00686 018711 

148061 

96 00638 018761 

838461 

888814 

90 88648 818761 

148461 
880838 

68 

61 88646 188768 
888887 

68 88692 081887 

63 88664 
88684 818746 

800888 

64 88668 
68668 884767 

088688 

69 88664 
88664 884767 

088634 
66 88678 889786 
67 
66 88678 089837 

081046 
60 00676 092737 

170000 

001046 
70 
71 
72 
73 
74 



MACKO-U V3AO0O ^*6E 7* 



MOV 


«BTMPSZill8 


MOV 

411 cm 

DEC 
8NE 
IINITIAUIZE ' 
MOV 


RliR3 
(R3J* 

US 

4S 

rABLE 

TABLAO.Rl 


MOV 
MOV 


Rl,RS 
•TABL8Z,R2 


3SI MOV 


•-1,(R3); 


DEC 
BNE 
MOV 


r2 
36 

•LPl.CRU 


MOV 


•CD1,CDTeOP(R 


MOV 


#LTl,PLTeOP(R 


|8*VE BITMAP 
TSTB 


t TABLE J 
7(R0) 


BNE 

PUSH 

MOV 


1» 

#>*R1TEF 
«I*RITEP.-CSP) 


CALL 


sarebm 

PCfSAREBM 


CALL 
JSR 


8ARETB 

PC.SARETb 


TST 
fSET SPOOLER 
l«l CLR 


(»P)* 
smitches 

MSPOLSN 



|6ET BIT MAP SIZE IN R2 

>6ET ADDRESS OP TABLE IN Rl,R3,Rl 
IGET TABLE SIZE IN R2 

ISET LPICDEO) IN TABLE 



BIS 



IPLAIN BEGIN OR BEGIN AFTER RESTORE 

ISAVE DISK FUNC. 

ISAVE BIT MAP 

iSAVE TABLE 

ICLEAN STACK 
IRESET SPOOLER SWITCHES 
«8E6SN.««SP0LSM fSET SPOOLER ENABLED AND RUNNING 



I 

lALL SPOOLED TASKS HAVE TO BE INITIALISED. OPERATIONS LIKE SETTING 
l» RESETTING SNITCHES, SfTTING UP POINTERS, BUFFERS, STARTING UP 
»TA8K ETC, HAVE TO BE DONE AS INDICATED FOR EACH TASK 



ti 
09 

96 01010 109067 

003347 

97 01014 018767 

881888 
083342 

06 01«28 013702 

001010 
09 81826 062702 

000828 
108 1832 

1838 084767 

088876 
181 
108 1036 811167 

818670 
103 1042 818167 

884896 
184 1046 822121 
189 1898 818187 

884892 
186 1894 188867 

884843 
107 



.frOF 8LP 

UNITIALIZE LP SP00LER/DE8P00LER TASK 

CLRB L^ONCE 



MOV 



«l8e0,LPONCE«l 



MOV 


#(»LISTH0,R2 


ADO 


«LPC0Q«4,R2 


CALL 
JSR 


EHPTO 
PC.EMPTD 


MOV 


•Rl,NBN*tABLE 


MOV 


Rl.LPCBCF 


CMP 
MOV 


(Rn*,fRl)* 
Rl,LPHDCP 


CLRB 


lPbms 


IkDC 





IGET ADDRESS OF LISTHP IN R9 
ICLEAR LP DEQUEI TASK C0DEb4 

>SET NBNaCBN FOR START UP 



Figure 5-1 
UNICHANNEL Spooler Components (Cont.) 



5-10 



8P0L11.125 MACHO-ll V3A000 PAGE 7* 
BEGIN DIRECTIVE 



121 






|ALL DONE DEQUE 


NEXT RfQuCST 


122 


1130 






CALL 


deqreo 




1130 


004707 
000242 




JSR 


RCfDEQREa 


123 






t 






124 






lEMPTY 


TASK DEQUE 


129 


1134 




EMPTDI 






120 


1134 






,INH 






1134 






PUSH 


»«RS 




1134 


013746 
177778 




MOV 


••R8,-(8p) 




1140 


092797 
000940 
177770 




BIS 


«LVL7,*«PS 


ii7 


1146 


012701 
001028 




MOV 


OEMRTYiRi 


128 


1192 


004791 




JSB 


RC,#(R1); 


129 


1194 






.ENA 






1184 






POP 


•MS 




1154 


012697 
177776 




MOV 


(8R)«.»i*pS 


190 


1160 






CALL 


FiNDBK 




1160 


004767 
000994 




JSPt 


RC.riNOBK 


131 


1164 


010148 




MOV 


Rl*-(8R) 


192 


lies 






CALL 


getbuf 




1166 


004787 
001920 




JSR 


rc.getbuf 


199 


1172 






POP 


(Rl) 




1172 


012811 




MOV 


(»»)♦, (Rl) 


134 


1174 


000207 




RETURN 




19S 








.SBTTL 


END 



llNHIBIT INTERRUPTS 

IEMPTT tasks DEQUE 
lENABLE INTERRUPTS 
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END 
1 

a 

3 

4 
S 

6 

7 001176 013701 
001092 

I 001202 00S067 

170734 

9 001206 009037 

001064 

10 01212 008001 

000034 

II 01216 098737 

000340 

177776 
12 01224 013701 

001060 
13 
14 01230 016102 

000010 
18 01234 

01234 004767 

000070 
16 



NACRO-ll V3A0O0 PAGE 9 



»THIi HOUTINE SMUTS OOWN ALL SMOLING OPERATIONS. THE TIMER REQUEST 

IIS CANCELLEDf SOPTHAIIE INTERRUPTS ARE IGNORED AND THE SPOLll TASK 

IIS DISCONNECTED PROM RIREX 

I 

I 

END I MOV 

CLR 

CLR 

CLR 

0IS 

MOV 



••CLTA0L.R1 
SPST-4 

••OEVSPL 

SPC00*4(R1) 

*tVL7,#«pS 

••TEVAOD.Rl 



»NULL SPOOLER TIMER RE0UE5T 
lENABLE STOP ALL I/O 

ICLEAR DEVICED SPOOLED SWITCH 

lINHIBIT INT. 

»FIND THE ENTRY ADDRESS 



.IPOP SLP 

MOV L^C0^*2(Rp.R2 iPIND TASK ADDRESS 



CALL STfTSK 
J8R PC,STfT8K 

«£NDC 



ISTOP THE TASK 



SO 01260 009037 
001046 

26 01264 012701 

001036 

27 01270 013702 

001002 

20 01274 011162 

000016 

29 01300 012701 

000001 

30 01304 012702 

001024 

31 01310 004732 

32 01312 
01312 010709 
01314 082709 

011394 

33 01320 
01320 012704 

100000 
01324 000004 

01326 001 

01327 000 
...34 

38 01330 009762 
177774 

jr frs5r-i000i0 

37 01338 014203 

38 01340 122713 

000007 

39 01344 001004 

40 01348 009012 

41 01390 009042 

42 01392 009072 

177776 

43 01396 000207 
44 

49 



CLR 

MOV 

MOV 

MOV 

MOV 

MOV 

JSR 
ADR 
MOV 
ADD 

IREQ 
MOV 

!0T 
.BTTE 

I 

STPTSKi TST 

BPL 
MOV 
CMPB 

BNE 
CLR 
CLR 
CLR 



IRESET SPOOLER Sw 

»GET RETURN INST. ADD IN Rl 



••SPOLSH 

«RTURN.R{ 

**SEND11.R2 

lRn.SPC0D*2(R2) rSHUT OFF SENDll 



«lfRl 

«SEND19,R2 

PC,#{R2}; 
TCTOIS.Rg 
PC.RS 
•TCB0IS-'.,R9 

«lfl0B0P,R4 

IfO 



.<(R2J |POP-H REQUEST? 



ITELL SP0L19 DONE 



ISCT FA 



fSEND REQUEST 



fNO — IGNORE 

lYES — TEST FOR SPOLLER REQUEST? 



1» 

-CR2),R3 
»8PC0D,»R3 

1« 
•R2 

•(R2) iSTOP TASK (CLEAR TCB ADR 

•■2t»21 iSTOP DEVICE FROM INTERRUPTING 



ISI 

I 

I 



RETURN 
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STUfCT 

»CET AOORESS OF TCBCO IN n\ 

ICNTCR COMMON ROUTNINC 



sp3Lt:.i2S H*c»o-ii v3i0aa page le 

UTILITY ?ounnii 

1 .saTTL UTILITY ROUTINES 

2 .IfDF SCO 

3 ; 

* »SET U)» TCB TO READ * CARD FROM CO 

5 /CALLING SEQUENCEl hCV 8UFA0,R3 

, ' CALL 

8 ZB1S3B BlZ7e< STUPCTi HOV PC, Pi 

9 821532 a527B! ADO »TCBC0-..R: 

83732B 
IB atSSS 338434 as STUCOM 

•I .£»JDC 

'2 .I?DF »LP 

i3 , 

\i »*ET UP TC9 TO WRITE A LINE ON LP 

II /CALLING SEQUENCE* mOV BUFAD.RS 

\j j CALU 8TUPLT 

IS l\l:i a^^,%'^l ''''''' :°5 :fj;,',. ,, '«T AOORESS OP TCBLP IN «l S R5 

22 31546 233433 ^^ sTUCOM 

" ,lfOf SPL 

23 ; 

2* J2ET UP TCB TO NRlTE A LJNE ON PL 

2-> JCALLING SCOUENCEI mOV BUFAD,R3 



28 

27 i 

2* STUPPTj MOV 

3J 31556 KiiaSSi STUCOHi-MOV 

aaaaia 

92 31554 313!3j 

33 31558 aasaii 

1^32334 

34 Z1552 
31582 i:i2724 

;a33?3 
3lS$3 £33334 
31573 331 
31371 03a 

35 31372 233237 
35 
37 
28 
3S 
43 



HOV 
CLR 

IfiEQ 

lOT 
.BYTE 

RETURN 



CALL 

"C.Rj 
•TCBPL-..RI 

R5il«CRl) 

RliRB 

4(Rn 



>il0333fltR4 
1>3 



8TUPPT 

»GCT AOORESS OP TC8PL IN Rl ( R9 



IRCSET REV 
I SEND 



41 
42 



ADR «.CRN,R3 
AOR TCB0K-,R2 
CAUL STUPDT 



43 B1974 810233 STUPOTl HQV 

44 31576 B22222 CMP 



R2fRS 
tfi23*,(fl25* 



ISAVE TCBP IN R5 
»BUMP TO REV 
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77 




?e 




73 




iZ 




B! 




;2 




83 




34 




B9 




89 




87 




S6 22116 


116??2 




<j<!!!e?2 


53 82122 


122^32 




iizdd* 


92 32126 


Mai 411 


91 22:33 


1227:2 




«J22::5 


92 22134 


Ii4i4ll 


S3 32135 


1227?2 




<!^ ?.■>■? 5 


#4 22142 


i;ai:i2 


55 Z2144 


tii£7a2 




8l3Se36 


S8 ?2isa 


2a?4?3 


S7 221Si 


wl8732 




■iJiiZS 


93 32136 


Zf.ZtZ2 


93 




132 21 !3 


a '.6732 




^^3224 


131 2184 




132 2184 


^33112 


123 2165 


auuai 


1J4 2178 




1^3 




136 2178 


a^aaer 


ie7 




123 




IZi 2172 




3172 


312582 


na 2174 




2174 


313746 




177778 


111 222Z 




'£iZZ 


213248 


i;2 22^2 




2322 


3ie?4a 


113 2ie4 




2204 


siei46 


iU 2236 




2233 


«3ia2<6 


115 2213 





»TH£ ?0'.|.OKING PIECE OF CODE CHECKS TO SEE ir THE CURRENT BUOCK TO BE 

liLLCC*TE3 TO TmE CUOBFNT SPOOLING TASK EQUALS THE CBN OF THIS 

jDISPOO' :n5 TAS.'-;IF THIS IS TSJE, THEN THE isPOOLER IS DECLARED FLOODED' 

jTMIS HiPPtK;S Qi^L^ CN 4 WRAP iROUNOCENTIRE SPOOLER AREA IS TREATED AS A 

JRISG guFFtR)«HEN SPOOLING OPERATIONS ARE M»Y AHEAD OF DESPOOLING OPERATIONS 

J 

j«««*.NOTEI AS NEK TASKS ARE ADDED NEW CODE HAS TO BE ADDED***** 
}•••**«.••* 8IH1L*R TO The code FOR EXISTING TASKS************** 
I 



21SI 



HOVB 


3CRa),R2 


>GET CURI 


CMP8 


VLPCCO.Ra 


|LP» 


BEO 
CMPB 


2U 

«C0C0D*2flatR2 


INO. COT 


BCD 
CHP8 


22S 

bPLCOO.RJ 


INO. Put 


BNE 
hOV 


261 

TABPLC.Ra 


lYES 


MOV 


3BJ 

TAflPCB.Ra 




BR 


3811 




MSV 


T4BCDC.R2 




CMP 
BEC 


Ki>(R2) 
9S 





36I> 



RETURN 



IRETURN MITH BLOCK « ON STACK 



JSCRRY NO BLOCK F«EEt? SETUP TO HALT CURRENT OPERATION 
iSI . POP Ri fCCT RETURN ADDRESS 

)A£T UP STACK FOR RCSTART 
)SAVE PC 



POP 


R2 


MOV 


(»P)*.R2 


PUSH 


t»?i 


MOV 


•OPS.-CSPJ 


PUSH 


r2 


MOV 


R2,.(SP] 


PJS^ 


R3 


HCV 


BiS,-(SP3 


PUSH 


fll 


MOV 


Rl,-(SP) 


PUSH 


R2 


MQV 


ft2,-{3P) 


PUSH 


R9 
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spoun.iz 

TASK SOFT 

1 

2 

3 

4 

5 

6 

7 

8 003240 



9 003246 

10 03250 



11 03256 

12 03260 



13 03266 

14 05270 



15 03276 

16 03300 

i7 
18 

19 03304 

20 

21 03310 

22 

23 

24 

29 03314 

26 03314 

27 

28 



MACRO-U V34000 P*GP ?2 
WARE INTERRUPT DISPATCHER 

; 



022760 
000001 
000004 
001022 
122760 

000202 
000002 
001417 
122760 
000204 
000002 
001406 
122760 
00020S 
000002 
001404 
000167 
002072 



000167 
000646 

000167 
002126 



000207 



»SEND15 IN PIREX TRANSFERS CONTROL TO DCVINT BY A "CALL •SENDll (-C00*2) ' 

IIF REQUESTED IN TCB. THIS IS DONE BY A CODE OF '3i IN BYTE-3 

lOF TCB. SPOOLER SETS THp ADDRESS OF DEVINT IN SENDll WHEN STARTED 

1 

I 

DEVINTi CMP »1,4(R0) 



I 
I 
291 

I 
3SI 

I 
I 
I 
SSI 

I 



IGOOD COMPLETION?? 



BNE SS rBRANCH IF NO 

CMPB #RKCOO*200.TCOOE(R0) »RK REQ,? 



BEQ RKINT 

CMPB I»LPCOD*2bB,TCODECR0) »LP REO' 



BEQ 2S 

CMPB #C0C00*2aB»TC00ECRB) »CD REQ? 



BEQ 3S 

JMP PLINT 



JMP L'INT 
JMP COINT 



RETURN 

.SBTTL RK INTERRUPT SERVICE 
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SPaLn.123 MACRO-ll V3A000 PACE 9Z^ 
RK INTERRUPT SERVICE 



41 






.IFDF 


SLP 




42 




» 








43 




IREAD 


REQUEST 


WAS MADE FOR LP. 




44 03942 


016703 
889892 


lest 


MOV 


TABLA0,R3 


jCBN«LF8? 


49 03946 


826863 
000006 
000012 




CMP 


6(R81,LPBtR3J 




46 03994 


001003 




BNE 


l3« 




47 03996 


012763 
177777 
000012 




MOV 


••1,LFB(R33 


lYES, SET LFB«-1 


46 03964 




13SI 








4S 83964 


105067 
000574 

189367 




CLPB 


lPbmo 




90 03978 




DECS 


lPbufs 


»DECREMENT LPBUFS 




008571 










91 83974 


122767 

800001 
000961 




CHPB 


•i.LPOMCE 


lLPONCE-1? 


02 83682 


001133 




BNE 


DONE 


IBRANCH IF NO 


93 83684 


016702 
009044 




NOV 


lPczad.r? 


»YES, START UP LP 


94 83618 




llSl 


CALL 


l2$ 




83618 


004767 
000032 




JSR 


PC, 12$ 




59 83614 


109267 
000943 




INCB 


lponce 


|SET ONCE ONLY CQMP 


96 83628 


032737 
•40000 

001046 




BIT 


«40o«o,#«SI>OlSM 


»5HUT DOWN? 


97 03626 


001521 




BEO 


DONE 




58 83638 


811289 




NOV 


»R2,R9 


ISAVE BUFAO ON STAC 


59 83632 






CALL 


STUPLT 


INO SET LP TCB 


83632 


084767 
179762 




JSR 


pc.stuplt 




60 03636 


052737 
888881 
801046 




BIS 


NI^MSPOl'SN 


fSET LP BUSY SM 


61 03644 


088912 




BR 


DONE 


lEXIT 


62 






.ENOC 






63 




> 








64 




^SECTIONS 12 USED POR LP AND PL 




65 




1 








66 




t 








67 03646 


816863 
800006 
000002 


12SI 


NOV 


6(R0),eBM{R3) 


ISET CBN IN TABLE 


66 03694 






PUSH 


l2(R0) 


|8*VE FA ON STACK 


03694 


010046 
000012 




NOV 


l8(R0J.-iCSP) 




69 03660 


011622 




NOV 


•8P,fR8j; 


pSET LPCBIP 


70 03662 


812712 

888884 




NOV 


»4,(R21 


»SET LPWDIP 


71 03666 


•81612 




ADD 


•SP,fR2) 


ICONPUTE LPWDIP 


72 03670 


862716 
888776 




ADD 


OTwDl.fSp) 


IBUNP TO LINK A NBN 




813883 










r u Dwwr « 




nu* 


w%ar i*iNnNi,R3/ 


iaci HeH xN TABLE 




888886 










74 03700 


812763 
800004 
000004 




MOV 


»4,CRPfR3) 


ISET CRP IN TABLE 


79 03706 


000207 




RETURN 
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SPOLll.iaS MACRO-ll V3A000 P*Gt ?4 
RK INTERRUPT SERVICE 



18 
19 

2B 04140 

21 04144 

22 04146 

23 04152 



24 04160 

25 04164 

26 04166 

27 04170 

28 04172 

29 04174 
04174 

30 04200 
04200 

31 

32 04204 
04204 

33 04210 
04210 

34 04212 
04212 

35 04216 
04216 

36 04222 
04222 

37 04226 

38 04232 



»WRITE 
016701 41S> 
004512 
105011 
016705 
004446 
016085 
000006 
000010 
016703 
004422 
105713 
001341 
105223 
105213 

004767 
176512 



012746 
000004 



44S| 



012746 

000004 

010146 

016546 
000006 

004767 
176720 

004767 
176420 
062706 
000010 
000717 



.IFOF SL^ 
REQUEST MADE FOR LP 

MOV lPbmsa.ri 

CURB (fl) 

MOV T*BLAD,R5 



jRESET LPBMSA 



MOV 



MOV 

T3TB 

BNE 

INCB 

INCB 

CALL 

JSP 

PUSH 
MOV 

.ENOC 

pgSH 

MOV 

PUSH 
MOV 
PUSH 
MOV 

CALL 
JSR 

CALL 
JSR 

ADD 

BR 



6CR05,L5BCR53 »SET LSB In TABLE 



lP0NA0,R3 

(R3) 

OONE 

(R33* 

(R3) 

CETBUF 

PC.GETRUF 

•LPCOD 
»LPCOD,-tSP) 



«REAOF 
»READF.-(SP) 

Rl 
Rl,-(3P) 

nBN(R55 
NBNtR55,-CSP5 

GETRKT 
PC.GETRKT 

GtTPUT 
pCiSETPUT 

«10.SP 

DONE 



|GET add OF LPBMS IN R3 

;FIRST TIME THROUGH?? 

lYES. SET SW. 
JSET LP8M0 
»GET A BUFFER 

»SETUP FOR GETPUT SAVE DEV CODE 

;SAVE DISK FUN. 

jSAVE BUFFER ADO 
;SAVE BLOCK *» 

IGET * RK TCB 

;GET BLOCK 

;CLEAN STACK 
JCHECK REV & EXIT 
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LP INTERRUPT SERVICE 



I 



004362 
004363 
004364 
004369 



»TH1S ROUTINE 
IDRIVER TASK I 
I 

.IFOF 
000 LPDuMIi .BYTE 
000 L^ONCEl .BYTE 

000 l^bmdi .byte 

000 LPBUFSi .byte 

10 04366 000000 LRCBZPl 

11 04370 000000 LPNOIPl 

12 04372 000000 L^OBIPi 

15 .ENDC 

I* I 

15 I 
18 .IFNDF 

17 LPINTi NOV 
1> MOVB 

l» RETURN 

!? .ENDC 

21 .IFDF 

22 t 

23 04374 016701 LPlNTi HOV 

004262 

24 04400 092737 

000240 
177776 

29 04406 022711 

177777 

26 04412 001014 

27 04414 016703 tlSl 

004166 
26 04420 109023 
20 04422 109023 

30 04424 109223 

31 04426 011303 

32 04430 
04430 004767 

176360 

33 04434 042737 2s: 

000001 
001046 

34 04442 000207 S0SI 
39 04444 009711 ISl 
39 04446 001040 

37 04490 016704 l9St 

004200 

38 04494 011403 

39 04496 
04496 004767 

17S332 

40 04462 109244 

41 04464 109764 10St 

177777 

42 04470 001403 

43 04472 
04472 004767 

179222 

44 04476 000772 
49 04900 

46 04900 016767 

009226 
009220 

47 04906 012767 

000004 
009214 

48 04914 010703 

49 04916 062703 

177694 

90 04922 011304 

91 04924 016467 

000776 
009200 

92 04932 016702 

004116 

93 04936 011322 

94 04940 011312 
99 04942 062712 

000004 



HANDLES COMPLETION OF I/O SOFTWARE INTERRUPT FROM THE 
N PIREX, IT DESPOOLS THE SPOOLED DAT* ONTO THE LP. 



ILP 











lUNUSED 
lONCE ONLY SW 
IBLOCK in motion SW 
lEMPTY BUFFER COUNT 
»CURRENT BUFFER POINTER 
ICURRENT WORD POINTER 
»NEXT BUFFER POINTER 



4SI 



BIS 



CMP 

BNE 
MOV 

CLRB 

CLRB 

INCB 

MOV 

CALL 

JSR 

BIC 



RETURN 
TST 
BNE 
MOV 

MOV 

CALL 

JSR 

INCB 
TSTB 

BEO 

CALL 

JSR 

BR 

MOV 



MOV 



MOV 
ADD 

MOV 
MOV 



MOV 

MOV 
MOV 
ADD 



slp 

••OEVST,Rl 

• IOP877,LPSFERtRn 



SLP 

TABCRT.Ri 
•LVL9,««PS 



^REPORT TASK NOT SUPPORTED 



#-l,fRl) 
1» 

lPonad.Rs 

CR33* 

(R3),R3 

GiVBUF 

PC.GIVBUF 

#1,##SP0lSW 



3S 

LPCPA0,R4 

t«45,R3 
GiVBuF 
PC, GIVBUF 

-CR43 
-1CR45 

4S 

WAITBK 
PC.WAITBk 



IBS 

table*nbn,table*cbn 
•<,table*crp 



»INHIBIT DISK INTERRUPTS 
/ANY MORE TO DO? 

»GET CtLPCBIP) IN R3 

;RESET SW.tS 
JBUMP TO LPBUFS 
/RELEASE BUFF. 

/GIVE BACK BUFFER 
/NO. SET LP IDLE SW 

/YES, BLOCK IN MOTION? 

/SK-124 YES, GET ADD OF LLPCPADBIP IK R2 

/RELEASE BUFFER 

/BLOCK READ IN? 



/SET CBNaNBN 
/SET CRP 



PC.R3 /GET LPOBIP ADO. IN R3 

#LP0BIP-.,R3 

{"''•R* /GET CCLPOBIP) IN R3 S BUMP TO TWDI 

TWD1(R4),TABLE*NBN /SET LP.NBN 



LPCPA0,R2 

(R3),(R2i* 

(R3),(R25 

**iCR21 



/GET ADD. OF LLPCPADBIP In H? 



/SET LPCBIP 
/SET LPWDIP 
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SPQLU.125 MACRO 
IP INTERRUPT SERVICE 
56 04546 000412 
97 04550 016702 3SI 
004064 

58 04554 017246 

000000 

59 04560 062716 

000005 

60 04564 042716 

177401 

61 04570 06x611 

62 04972 062612 

63 04574 032737 5Sl 

040000 
001046 

64 04602 001714 
69 04604 032737 

000001 
001046 

66 04612 001710 

67 04614 032737 

010000 
001046 

68 04622 001704 

69 04624 00S772 

000000 

70 04630 001024 

71 04632 026161 

177776 

000004 
001003 

004767 

000240 

000662 

016704 14SI 

003732 

062704 

000002 

122714 

000001 

001271 
109764 
177777 

001266 

004767 
000146 
000663 



■11 V3*6 

BR 
MOV 

MQV 

ADD 

BIC 

ADD 
ADD 
BIT 



BEO 
BIT 



72 04640 

73 04642 
04642 

74 04646 
79 04690 

76 04654 

77 04660 

78 04664 

79 04666 

81 04674 
04674 

82 04700 
83 

84 

85 04702 

86 04704 

04704 

87 04710 

88 04714 

89 04716 

90 04722 

91 04726 

92 04732 

93 04734 

94 04736 

95 04742 

96 04744 

97 04746 

98 04752 

99 04754 

100 4760 

101 4762 

102 4764 

103 4766 



f 
011205 1331 

004767 
174710 
016701 
003746 
011204 
017246 
000000 
062716 
000005 
042716 
177401 
062604 
010702 
062702 
177427 
005714 
001417 
022714 
177777 
001414 
122712 
000001 
001230 
105742 
001226 
026161 
177776 
000004 



BEQ 
BIT 



BEO 
TST 



BNE 
CMP 



BNE 

CALL 

JSR 

BR 

MOV 

ADD 

CMPB 

BNE 
T3TB 

BNE 

CALL 

J8R 

BR 



MOV 

CALL 

JSR 

MQV 

MQV 

MOV 

ADO 

BIC 

ADD 
MOV 
ADD 

TST 
BEQ 
CMP 

BEQ 
CMPB 

BNE 
TSTB 
BNE 
CMP 



Page ?6+ 
lPcwad.r? 

•CR25,-(sP3 

#5,CSP1 

#177401, fSP) 

CSP3,(R15 
CSP5*, tR2) 



jSEND rtRlTE REQ IF NOT SHUT DOWN 
;GET ADO OF LPWDIP IN R2 



;EVEN BYTE COUNT 



jBUMP CRP 
jBUMP LPWDIP 



lt4000fl,*«SPOLSW ;8HUT DOWN? 



2» 

«lt#«i3P0LSM 



25 



»SHUT LP? 



11100610, #«5P0LSW (SHUT DE3P00LER 



12» 
PC,12S 

lis 

LP0NAD,R4 

«2,R4 

«1,(R4) 

15S 
-1CR4) 

l5$ 
9S 

pC,gs 
l5l 



|iR2,R5 

sTuplt 
pc.stuplt 

tabcpt.ri 

tl'2).R4 
•CR25,-CSP) 

#5,(8P5 

•177401, (8P) 

t8p)*,R4 
PC,R8 
•LPBUFS-l ,R2 

(R45 
6S 

#"1,(R4) 

6S 

*1,(R25 

ses 

-CR25 

90S 

-2tRn,4fRn 



JFIRST RECORD A .CLOSE? 



2* 

#(R2) 

138 

-2CRn.4fRn >ANY MORE DATA? 



;N0, SET TABLE ENTRIES 

»RESET SWITCHES ft EXIT 
rSK-124 GET LPBUFS ADRRESS 

}SK-124 

lSK-124 ONE FREE BUFFER? 

;SK-124 

lSK-124 YES. BLOCK IN MOTION? 

;SK-124 

;9K-124 NO. GET NEXT BLOCK 

>SK-124 RELEASE BUFFER S WAIT FOR BLOCK TO COME UN 



JNO. SAVE BUFF ADO ON STACK 
;SET UP TCB TO UNTI A LINE 



/CHECK FOR BUFFER EMPTY 
;GET BYTE COUNT 

JEVEN BYTE COUNT 



jBUHP R4 TO POINT TO PT WORD OF NEXT 
»N0, GET ADD OF LPBUFS IN R2 



;LAST RECORD? 



;LPBUFS«1 

JYES. BLOCK IN NEXT? 

jNO, MORE TO DOE CCBN«LSB3 
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SPOlll.129 MACRO-11 VSA000 PAGE 26; 
LP JNTERRUPT 8ERVICI 

104 4774 001822 BEQ 98S 

105 4776 CALL 9» 
4776 004787 J3R PC, 91 

000044 

106 9002 000617 BR 30S 

107 ; 

108 ; 

109 IBUFFER EMPTY! TeST IF MqRE BLOCK TO 00? 
*••*•* A 

110 9004 026181 6SI 

177776 
000004 

111 9012 001412 

112 9014 009011 

113 9016 122712 

000001 

114 9022 001004 
119 9024 109742 

116 9026 001002 

117 9030 
9030 004787 

000012 
**•*•* A 

118 6894 000187 8Sl 

177402 

119 |N0 MORE BLOCKS TO 00 
*•**•* A 

120 9040 7$l CALL 
9040 004787 JSR 

000042 

121 9044 000773 BR 



;SK-124 GET NEXT BLOCK 
»SK-124 EXIT 



CMP 


-2CRn. 


-•'(Rn 


;MORE TO 007 tCBN»LSB) 


BEQ 
CLP 
CMPB 


7» 

tPl) 
<»liCR25 




jSK-124 SET CRP»0 
>LPBUFS«1? 


BNE 

T9TB 

BNE 

CALL 

JSR 


8S 

-CR85 

89 

98 

PC,gs 




IBLOCK IN TRANSIT? 

;SK-124 

lSK-124 GET NEXT BLOCK 


JMP 


90$ 




jSK-125 



12S 

PC,12S 



89 



ISET TABLE ENTRIES 



122 


t 






123 


1 






124 


;get 


NEXT BLOCK 




*••••« A 








129 9046 


. gsi 


PUSH 


Rl 


9046 


010146 


MOV 


Rl,-(8P) 


126 9080 




PUSH 


R2 


8090 


010246 


MOV 


R2,-(9R) 


127 9092 




CALL 


getbuf 


9092 


004767 
179634 


JSR 


PC.GETBUF 


128 9056 


010104 


MOV 


Rl«R4 


129 9060 




POP 


R2 


9068 


012602 


MOV 


(SP)*,R2 


130 9062 




POP 


Rl 


9062 


012601 


MQV 


(SP5*,R1 


131 9084 


010467 
177302 


MOV 


R4,LP0BIP 


132 5070 


109212 


INCB 


("2) 


133 9072 


012703 
000084 


MOV 


»LPC0D,R3 


134 9076 


010102 


MOV 


RliRS 


139 9100 




CALL 


getblk 


9100 


004767 
003200 


JSR 


PC,GETBLK 


136 9104 


000207 


RETURN 




137 


1 






••**«* A 








138 9106 


012711 1211 
177777 


MOV 


«-l»#Rl 


139 9112 


012761 
U7777 
000006 


MOV 


••liBtRH 


140 9120 


000207 


RETURN 




141 


; 






142 




.ENDC 




143 




.SBTTL 


lp call service 



lYES. GET BUFFER S READ NEXT BLOCK 
ISAVE BUFAD IN R4 

ISET LPOBIP 

ISET LPBMS SW 

IGET OEV.CCDE IN R3. FOR GETBLK 

>GET LP.CRP ADD. IN Ro 
IGET BLOCK FROM DISK 

lSK.124 

>SET CRP"-1 
ISET LP8«-1 
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SP0Lll,125 

LP CALL StRVICE 

1 

2 

3 

4 

5 

6 005122 000 

7 005123 000 

8 005124 000000 

9 005126 000000 

10 05130 000000 
11 

12 
13 
14 
15 
1« 
17 
1« 
19 
28 05132 024141 

21 05134 032737 

020000 
001046 

22 05142 001433 

23 05144 
05144 010146 

24 05146 011101 

25 05150 010104 

26 05152 016003 

000010 

27 05156 006303 

28 05160 063703 

000040 

29 05164 111302 

30 05166 062702 

000005 

31 05172 042702 

177401 

32 05176 060201 

33 05200 011605 

34 05202 
05202 014546 

35 05204 006202 

36 05206 162601 

37 05210 022701 

000770 

38 05214 002462 

39 05216 
05216 004767 

000356 

40 05222 
05222 012604 

41 05224 
05224 004767 

000270 

42 05230 000406 
43 

44 05232 012760 
177200 



MACRO-ii V3A000 Page 27 
» 

ITHIS ROUTINE SERVICES CiLLS TO OUTPUT DATA ONTO THE LP. IT SPOOLS THE 

>DATA SENT BY THE CALLER ONTO THE DISK, 

I 

.IFDF $LP 
LPDUMCi .byte 
LPBMSI .byte 
LPCBCPl 
LPWDCPl 
LPOBCPl 

.ENOC 
I 
» 

.IFNDF SlP 
LPCALLI MOV •«»0EVST,R1 

MOVB #47r,LPSpERtRn 

CALL qEOREO 

.ENOC 

.IFDF SLP 
LPCALLI CMP -CRn.-CRl) 



JUNUSED 

JBLOCK IN MOTION SW 
ICURRENT BUFFER POINTER 
ICURRENT 10R0 POINTER 
;NEXT BUFF POINTER COUMMY) 



JPOINT Rl TO LPWOCP 



10SI 



BIT 



BEO 

PUSH 

MQV 

MOV 

MOV 

MOV 

A8L 
ADO 

MOVB 
ADD 

BIC 

ADO 

MOV 

PUSH 

MOV 

ASR 

SUB 

CMP 

BLT 

CALL 

JSR 

POP 
MQV 
CALL 
JSR 

BR 

MOV 



#20000, *«SPOLSW ;SHUT SPOOLER? 



108 

Rl 

Rl,-tSP3 

(Rn.Ri 

RlfR4 
10CR03,R3 

r3 

••memsiz.rs 

("SJ.R? 

«5,R8 

#177401, R2 

R2,R1 

t5P),R5 

-CR5) 

-CR51,.(8P3 

R2 

(SP5*,RI 

#770, Rl 

4S 

COPBUF 
PC,COPBUF 

R4 

(SP)*,R4 

6S 

PC,6S 

8S 

#-6Pl?,4(B0) 



45 05240 
05240 010146 

46 05242 000167 

174142 
47 

48 05246 005741 

49 05250 010102 

80 08252 005721 

81 05254 011101 

52 05256 161201 

53 05260 022701 

000770 
84 05264 003034 

55 05266 010701 

56 05270 062701 

177636 

57 05274 005071 

000000 

58 05300 
05300 004767 

174434 



PUSH Rl 

MOV Rl,-(SP5 

JMP D^QRQ 

»LAST RECORD WAS NQT A .CLOSE 

881 TST -CRl) 

MOV Rl,R2 

TST (Rl)* 

MOV cRn.Ri 

SUB CR2),R1 

CMP #770rRl 



981 



BGT 
MOV 
ADD 

CLR 

CALL 
JSR 



28 

PC.Rl 
»LPWDCP-'.,R1 

• CRl) 

FiNOBK 
PC.FINOBk 



ISAVE Rl. NO 
JGET CONTENTS OF LPWOCP IN R1,R4 
;GET CALLER BUF. ADD. IN R3 
^RELOCATE ADD. 



;GET BYTE COUNT FROM BUFFER IN R2 
;ADO HWD BYTE COUNT ♦ EVEN BYTE COUNT 



IBUMP LPWDCP BY THE SIZE OF NEXT RECD. 

;GET LPWOCP ADD. IN R4 

IPOINT TO LPCBCP i SAVE CONT. OF lPCBCP ON STACK 



/CONVERT TO WORD COUNT 

/COMPUTE SPACE PEM. 
JSPACE LEFT? 



»COPY CALLER BUFFER 

JTEMP SAVE Rl IN R2 
;CHECK FOR .CLOSE 

}N0 

/SPOOLER SHUT DOWN, REPORT 

/DUMMY 



/POINT Rl LPCBCP 

/SAVE IN R2 

/BUMP Rl LPWDCP 

/GET CURRENT WORD ADD, IN Rl- 

/GET REMAINNING # OF WQROS 

/SPACE LEFT? 



/GET ADD. OF LPWDCP IN Rl 

/NO. PUT BUFFER ON DISK 
/GET DISK BLOCK # 
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SP0L11.128 MACRO. 


•11 V3AO00 


PAGE 27; 


LP CALL SCRVICC 






59 0S304 




PUSH 


Rl 


09304 


010146 


MOV 


Rli-C8P) 


60 0S306 


016702 
177612 


MOV 


lpcbcp.r? 


61 09312 


011662 
000776 


MOV 


(8R5,TwDi(R2) 


62 05316 


012703 
000004 


MOV 


*LPC0D,R3 


63 05322 


016701 
003330 


MOV 


LPBMS*,Ri 


64 09326 


105211 


INCB 


tPl) 


65 09330 




CALL 


PUTBLK 


05330 


004767 
002772 


JSR 


PC,PUTBLK 


66 05334 


016704 
003276 


MOV 


LPCBAD,R4 


67 05340 


3SI 


CALL 


GfeTBUF 


05340 


004767 
175346 


JSR 


PC.GCTBUF 


66 05344 


010124 


MOV 


Rl, tR4)* 


69 05346 




POP 


(Rl) 


05346 


012611 


MOV 


CSP)*,fPi) 


70 05350 


062701 
000004 


ADD 


»4,R1 


71 09354 


010114 


MOV 


Rl. (R45 


72 05358 


asi 


CALL 


OEQRPO 


05356 


004767 
174014 


JSR 


PC.OCQREQ 


73 05362 


411 


POP 


Rl 


09362 


012601 


MOV 


CSP)*,R1 


74 09364 




PUSH 


R3 


09364 


010346 


MOV 


R3,-(5P) 


79 09366 




PUSH 


R2 


09366 


010246 


MOV 


R2,-tSP3 


76 09370 


009071 
000000 


CLP 


• CRn 


77 09374 




CALL 


FlNDHK 


05374 


004767 
174340 


JSR 


pc,finobk 


78 05400 




PUSH 


Rl 


05400 


010146 


MOV 


Rl,-(SP) 


79 09402 




CALL 


SETBUF 


09402 


004767 
175304 


JSR 


PC.GETRUF 


80 09406 


011611 


MOV 


(Spj.cnn 


81 09410 


016704 
003222 


MOV 


LPCBAD,R4 


82 05414 




PUSH 


tR4) 


09414 


011446 


MQV 


(R4),-tSp3 


83 09416 




PUSH 


tR4) 


09416 


011446 


MOV 


(R4),-fSp) 


84 09420 


062716 
000776 


ADD 


»TWD1,(SP) 


89 09424 


016636 
000004 


MOV 


4CSP),#(SP)* 


as 09430 


010124 


MOV 


Ri,(R4)» 


87 05432 


062701 
000004 


ADD 


*4,Rl 


88 09436 




PUSH 


R4 


09436 


010446 


MOV 


R4,-(SP) 


89 09440 


010114 


MOV 


Rli (R41 


90 03442 


<«l0ia4 


MOV 


r1,R4 


91 09444 


016602 
000006 


MOV 


6CSP),R2 


92 09450 


016603 
000010 


MOV 


10C8P),R3 


93 05454 




CALL 


COPBUP 


05454 


004767 
000120 


JSR 


pc.copbuf 


94 05460 




POP 


R4 


05460 


012604 


MOV 


tSp)*,R4 


95 05462 




POP 


R2 


05462 


012602 


MOV 


(SP)*,R2 


96 05464 


012703 
000004 


MOV 


#LPC0D.R3 


97 05470 


062706 

000006 


ADO 


#6,SP 


98 05474 




PUSH 


R4 



>SAVE BLOCK tt ON STACK 

iGET CCLPCBIP) IN R2 
ISAVE BLOCK « IN TWQl 

IGET LP.OEV CODE IN R3 
ISET LP8MSA 

;PUT BUFF, ON DISK 

;GET ADD. OF LLPCBAOBCP IN H38R4 
>GET A NEW BUF 



>SET LPCBCP-BUFAO 

»SET BLOCK * IN HNO0 OF NEW BUFF, 

IBUMP fl2 TO WORD 2 OF BUF 

»SET LPWOCP 

;DEQUE REQUEST & EXIT IN WAIT STATE 



»RESTORE ADD. OF CURRENT WORD IN Rl 
»SAVE H3,R2 

;SET BUFF, END Sw 
;GET DISK BLOCK # 

;SAVE BLOCK « 
;GET A BUFF, 



»SET BLOCK «f IN HWOC! OF NEW BUFF, 

|6ET ADD, OF LLPCBAOBCP IN R4 



iSAVE COnT, of LPCBCP 

;BUMP TO TWDl 

ISET LINK IN OLD BUFF, 

;SET LPCBCP ft BUMP TO LPwOCP 
;POINT TO WORD 2 IN BUFF. 

;SAVE LPWDCP ADO, ON STACK 

;SET LPWOCP 

jGET CONT, Or LPwDCP 

»RESTORE R3,R2 



fCOPY CALLER BUFFER 

iSAVE LPWDCP ADD, IN R4 

ICONT, OF LPCBCP ON STACK TOP??? 

rGET DEV.COOE IM R3. FOR PUTBLK 

ICLEAN STACK 

;SAVE RS 
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SP0Lll,125 MACRO- 


11 V3A000 Page 271 


LP CALL SERVICE 






05474 010440 


MOV 


R4,-t9P) 


09 0S476 016701 


MOV 


lPbmsa.ri 


003194 






100 5502 109211 


INCB 


(Rl) 


101 9504 


CALL 


PUTBLK 


5504 004767 


J3R 


PC.PUTBLK 


002616 






102 55ia 


POP 


R4 


5510 012604 


MOV 


tSP5*,R4 


103 9512 


CALL 


6S 


5512 004797 


J3R 


PC,6S 


000002 






104 5516 000717 


BR 


2S 


109 9920 010401 6SI 


MOV 


R^.Rl 


106 9522 011104 


MOV 


t''n,R4 


107 9924 022764 


CMP 


«LPCL09,-2CR4) 


006414 






177776 






108 9932 001021 


BNE 


7» 


109 5534 010104 


MOV 


Rl«R4 


110 5536 


ADR 


TABLE*Lrn,R2 


5536 010702 


MOV 


PC,R2 


5940 062702 


ADD 


«TaBLE*LFB-.,R2 


004176 






111 9544 016701 


MOV 


LPCBAO.Ri 


003066 






112 9990 


PUSH 


CR23 


9990 011246 


MOV 


tP2),-tSp) 


113 5552 017112 


MOV 


• CRn, fR2) 


000000 






114 5596 011101 


MOV 


("D.Rl 


119 9960 


POP 


2CRn 


9960 012661 


MOV 


(8P)*,2{Rn 


000002 






116 9964 012761 


MOV 


• -l,TWO0(Rn 


177777 






000774 






117 5572 005726 


T3T 


t^P)* iRETURN 


118 5974 000634 


BR 


9S 


****** A 






119 9976 000207 7SI 


RETURN 




120 t 






121 


.ENOC 




122 


.iFor 


SLPJICD 


123 5800 012324 COPBUFj 


MOV 


("35*, tR43+ 


124 9602 005302 


DEC 


R2 


129 9604 001375 


BNE 


COPBUP 


126 5606 010476 


MOV 


R<.»2CSP5 


000002 






127 9612 000207 


RETURN 




128 1 






129 


.ENOC 




130 


.SBTTL 


PL INTFRRUPT SFB 



iset lpbmsa 

;put buff. on disk 

itemp save Rl 

;CHECK FOR .CLOSE 



;SAVE R4 

;GET CtLPWDCP] IN R4 



/RESTORE R4 

IGET LP.LPB add. IN R2 



ISAVE OLD LFB 
;SET LFB IN TABLE 

ISET OLD LFB IN BUFFER 

iSET EOF CODE IN BUFFER 



/COPY CALLER BUFFER 



Figure 5-1 
UNICHANNEL Spooler Components (Cont.) 
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ADDRESS TABLE 
1 



HACRO-n V3Ae00 PAGE 53 



.3BTTU ADDRESS TABLE 



a 

3 
4 
5 

a 007172 004145 LRQNADt 

7 

8 007174 010324 TABPLAl 

9 

10 

11 



007170 ADRTBLl 
007170 003024 RKCAOI 



PLONADi 



,MORO 
.IPOF 
.WORD 
,ENDC 
.WORD 
.IFDF 
.WORD 
.ENOC 



12 07176 007322 BTMPADi .WORD 

13 07200 007310 8TBKNAI .WORD 

14 07202 010274 TABLADi .WORD 

15 07204 010276 TABPCBt .WORD 

16 07206 010326 TABPLCi .WORD 

17 07210 010312 TABCOCI .WORD 

18 07212 010404 TCBKlAi .WORD 

19 .IFDP SCO 

20 07214 00S434 CDCpADt .WORD 

21 07216 006002 COCBADi .WORD 
22 
23 

24 07220 004706 LPCBADi 

25 07222 004192 uPOwADi 
26 



PLCBADi 
PLWOADJ 



.ENDC 
.IFDF 
.WORD 
.WORD 
.ENOC 
.IFDF 
.WORD 
.WORD 
.ENDC 
.WORD 
.WORD 
.WORD 
.IFDF 



C0BM8AI 
CDlNTAl 



.ENOC 
.WORD 
.WORD 
.WORD 
.IFDF 
PLCIADI .WORD 
PLOIADI .WORD 
PLBMSAl .WORD 
.ENOC 
.IFDF 
.WORD 
.WORD 
.ENDC 
.WORD 
.WORD 
.WORD 
.IFDF 
.WORD 
.WORD 
.WORD 
.ENDC 
.WORD 



RKTCBP 
HP 

lponce 
t*ble*plteof 

SPL 

PLONCE 

bTmpst 

STBKNH 

table 

table*cbn 

table*plteof*cbn 

T*flLE*C0TE0F*CBN 
TCBDKl 

CDCBIP 
CDCBCP 

SLP 

lpcbcp 
lPwdip 

JPU 

PUCBCP 

PLWDIP 



07224 010432 TC8K3AI .WORD TCBDK3 
07226 002322 ENOBADI .WORD ENDBSW 

33 07230 011116 BUFLADi .WORD BUFLHD 

34 .IFDF 81.P 
39 07232 LPCPADi 

36 07232 004190 LPCZADt .WORD 

37 07234 004709 lPBMSAI .WORD 

36 

39 07236 010310 TABCDTi 

40 07240 010300 TABCRTI 

41 07242 010330 TABPDTi 
42 
43 
44 
49 
46 
47 

48 07244 009431 

49 07246 009442 
90 

91 07250 010314 TABDCTl 

92 07252 006010 CDCAADi 

93 07254 000146 SPSTADi 
94 

59 07256 006006 CDOBADi 
96 07260 006746 RCSTADI 
57 07202 009777 COONADi 
98 
99 07264 000000 ONCEFLI 

60 177741 ADTCNT«ADRTBL-./2 

61 I 
82 I 
53 
84 J 

65 07266 BITMAPl .BLOCK 1^ 

66 07316 000000 S.TBKNMI .WORD 

67 07320 000000 .WORD 
8B 07322 BTHPSTI .BLOCK 



LfCBlP 

lpbhs 

table*cdteof 

table*crp 

table*plteof*crp 

SPU 

PUCBIP 
PLQBTP 
PU8HS 

SCD 

cDsns 

COINT 

TABLE*CDTEOF*CRP 

COCALL 

8PST 

SCO 

CDOBCP 

RESTRO 

CDONCE 



• TTMiiB ft TARl F 



iSPOOLER ID INFO 
ISPOOLER AREA FBN 
ISPOOLER AREA SIZE 
fSTART OF BIT MAP 




360 

69 000360 BTMPSZa.-BTHP8T/2 

70 10262 000000 BTMPEDl 

71 I 

72 10264 .BLOCK 4 

73 10274 TABLEI .BLOCK 4< 

74 000044 TABLSZa. •TABLE/2 

76 I TABLE ENTRIES aRE AS FOLLOWS FOR EACH TASKI 

77 t DEVC0D/CBN/CRP/NBN/L.3B/LFB 

78 ; 0/2/4/6/10/18 

79 » 



IPOINTER TO END OF BIT MAP 



iHWDtS 

|3 DEVICES 



14(8] WORDS EACH 



Figure 5-1 
:hANNEL Spooler Components (Cent.) 
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OUTPUT TASK 



SPACE LEFT IN BUFFER 
FOR CALLER'S DATA? 



COPY CALLER'S DATA INTO BUFFER 
AND UPDATE BUFFER POINTERS 

f 

EOF? 




SET EOB SWITCH 

SET EOF SWITCH 

SET LFB IN TABLE 






CALL FINDBK FOR 
AN UNUSED DISK BLOCK 



I 



SAVE DISK BLOCK 



I 



CALL PUTBLK TO WRITE 
OLD BUFFER TO THE DISK 



I 



CALL GETBUF FOR AN 
UNUSED CORE BUFFER 



I 



SET NEXT BLOCK # IN 

OLD BUFFER. SET BLOCK 

# IN NEW BUFFER 



I 



1 



CALL DEQREQ 



SET EOB FLAG (FOR DESPOOLER) 
IN BUFFER 



I 



CALL FINDBK FOR AN 
UNUSED DISK BLOCK 



I 



SAVE DISK BLOCK # 



I 



CALL GETBUF FOR AN 
UNUSED CORE BUFFER 



I 



SET NEXT BLOCK # IN OLD 

BUFFER. SET BLOCK # IN 

NEW BUFFER 



I 



UPDATE POINTER TO BEGINNING 
OF NEW BUFFER 



I 



CALL PUTBLK TO WRITE OLD 
BUFFER TO THE DISK 



J 



Figure 5-2 
Task Call Service Routine 
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Set the SPOOLER task control lines 17-20 
registers 

Setup the disk TCB pointer lines 23-30 
table 

Setup and initialize BITMAP lines 32-49 

Initialize and setup TABLE lines 51-59 

Save BITMAP and TABLE on disk lines 61-66 

Set the SPOOLER switches lines 68,69 

LINE PRINTER OPERATIONS: 

Initialize the LP call service lines 96, 97, 103-106 
routine switches and pointers 

Clear all pending LP task re- lines 9 8-100 
quests in PIREX get a free 
block on disk, get a buffer. 

Set the NBN entry in TABLE. line 102 

Process the next SPOOLER line 122 
request 



5.5.2 LP SPOOLING 

All requests issued to spooled tasks (TCN = 0-177) after a 'BEGIN' 
directive to the SPOOLER, are processed by the SPOOLER. This is 
effected by PIREX. When the LP handler in the PDP-15 issues a request 
to the LP driver task in PIREX, the SPOOLER processes this request. 
The 'request dispatcher' transfers control to the 'LP call service 
routine* and the following operations are performed (Refer to 
Figure 5-1) : 

Get the current word pointer page 27, line 20 
address 

Check if spooling operations are lines 21, 22 
disabled and if disabled exit 

Point to the current word lines 24, 25 

Get the caller's buffer address lines 26-28 
and relocate that address 

Get the byte count of the lines 29-31 

current record, add the header 
word byte count, and make the 
byte count even 

Move ahead the current word line 32 

pointer by the size of the 
current record 
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Compute the space remaining in line 33-36 
the current buffer 

Is the buffer full? lines 37-38 

Copy the caller's buffer lines 39, 123-127 

Check for a .CLOSE record lines 41, 105-10 8 

The record is not a .CLOSE; one lines 42, 48-54 
more record can fit. Process 
the next request 

The record is a .CLOSE record; lines 109, 110, 112 
save the old Last File Block 
(LFB) in TABLE 

Set the new LFB in TABLE line 113 

Set the old LFB in Header word 2 lines 114, 115 
of the buffer 

Set an end of file indicator in line 116 
the buffer 

Go to line 55 

The buffer is full. Set an indi- lines 55-57 

cator to this effect in the 

buffer 

Get a free block on disk (FINDBK) line 58 

Set a pointer to the next block lines 59-61 
in trailer word 1 

Set the "write block in motion" lines 63, 64 
switch 

Put the buffer on disk (PUTBLK) lines 62, 65 

Get another buffer (GETBUF) line 67 

Set the "current buffer" pointer lines 66, 68 
for the new buffer 

Set the block number in the line 69 

current buffer 

Set the current word pointer to lines 70, 71 
word 2 in the buffer 

Process the next request line 72 

As disk blocks are written on the disk the Last Spooled Block (LSB) 

entries in TABLE are updated when the completion of I/O interrupt 

is processed by the 'disk interrupt service routine' in the 
SPOOLER (RKINT) . 
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5.5.3 LP Despooling 

When the LP device is idle and the first spooled data block is written 
onto the disk the despooling operations are started in the RKINT 
routine as follows (Refer to Figure 5-1 and 5-3) . 

WRITE PROCESSOR: 

Reset the "write block in Page 24, lines 20, 21 
motion" switch 

Set the LSB in TABLE lines 22, 23 

LPONCE = 0, first time lines 24-27 

through set LPONCE = 1 

Set the "read block in line 28 

motion" switch 

Get a buffer (GETBUF) line 29 

Get a disk TCB (GETRKT) line 35 

Read a block from disk lines 32-34, 36, 37 

(GETPUT) 

Return the disk TCB and line 38 

then EXIT 

READ PROCESSOR: 

Is the block read = LFB? page 23, lines 44-46 

Yes, set LFB = 1 line 47 

Reset the "read block in line 49 
motion" switch 

Decrement the LP free buffer line 50 
count 

LPONCE = 1, first time lines 51-54 

through, start up LP 

Set Current Block Number line 67 
(CBN) in TABLE 

Set the current despooling lines 68, 69 
buffer pointer 

Set the current despooling lines 70, 71 
word pointer 

Set the Next Block Number lines 72, 73 
(NBN) in TABLE 

Set Current Record Pointer line 74 
(CRP) in TABLE 
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R KINT 




WHAT FUNCTION? 



CLEAR BLOCK IN 
MOTION SWITCH 



I 



DECREMENT FREE 
BUFFER SWITCH 



FIRST READ? 





UPDATE CBN, CRP, CBN 
IN TABLE 



OUTPUT TASK? 



" 



GO TO DONeI - ^ START UP TASK 




ONCE ONLY 
SWITCH SET? 




SET SWITCH 



SET BLOCK IN 
MOTION SWITCH 



CALL. GETBLK 



I 



GO TO DONE -^ 



Figure 5-3 
Device Interrupt Servicing Logic (For LP) 



5-29 



Set LPONCE = 2 line 55 

LP despooling is not shut lines 56-59 

down; send the LP write 

request 

Set the LP busy switch line 61 

Return the disk TCB and then 
EXIT 

Once despooling operations are started the 'LP interrupt service 
routine' continues the despooling operations until there is no more 
data to be despooled. 

The following operations are performed here (Refer to Figure 5-1) : 

Protect against a disk page 26, line 24 

interrupt 

There's nothing more to do; reset lines 25-28 
LPONCE 

Reset LPBMD and increment the lines 29, 30 
free buffer count 

Return the buffer (GIVBUF) lines 31, 32 

Set the LP idle switch and lines 33, 34 

return 

There's more to do; a block is lines 35, 36 
in motion 

Release the buffer (GIVBUF) lines 37-39 

Increment the free buffer count line 40 

Wait for a block to be read in lines 41-44 

Set CBN - NBN in TABLE line 46 

Set CRP in TABLE line 47 

Set NBN in TABLE lines 48-51 

Set the current despooling buffer lines 52-55 
and word pointer 

Shut down? Shut LP? Shut lines 6 3-68 

despooler? 

Current record in buffer is a lines 69-71 
.CLOSE record, check if more 
blocks to do 

There are no more blocks reset lines 73, 76, 120-122 
TABLE entries, switches and 
then exit 
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One free buffer and no block lines 75-80 
in motion 

Get next block line 81 

Release buffer and wait to lines 82, 37-44 

come in 

The first record is not a .CLOSE; lines 85-86 
send an LP write request 

Point to the first word of the lines 88-92 
next record 

There are more records left and lines 95-100 
one free buffer 

There is no read block in motion lines 101-104 
and more blocks to do 

Get next block lines 105, 125-136 

Return from interrupt call 



5.5.4 SPOOLER Shutdown 

All spooling operations can be terminated by issuing the 'END' direc- 
tive to the SPOOLER. The following operations are performed (Refer 
to Figure 5-1) : 

Reset the spooler timer request page 9, line 10 
in PIREX 

Set the PDP-15's request indicator line 8 
in the busy/idle switch 

Clear the 'device spooled' switch line 9 

Inhibit interrupts line 11 

Stop the LP task lines 15, 35-43 

Reset the spooler switch line 25 

Shut off software interrupts lines 26-28 

Tell the caller that the 'END' lines 29-30 
is completed 

Send a request to disconnect lines 32, 33 
the SPOOLER task 
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CHAPTER 6 
SPOOLER TASK DEVELOPMENT 



6 . 1 INTRODUCTION 

This chapter discusses in detail the procedure for developing a 
spooled task, and, for integrating it into the SPOOLER software. The 
development of a spooled task-'- in the UC15 system begins with the de- 
velopment and installation of the task under the PIREX system, if not 
already present (see Chapters 4 and 5) . 

Once this has been done, the following summary describes the steps 
necessary to integrate it into the SPOOLER software: 

1. Design and code the call service routine. (Refer to Figure 
6-1.) 



2. Design and code the interrupt service routine. 
Figure 6-1.) 



(Refer to 



DEVICE HANDLER 
ON PDP-15 



SPOOLER 



CALL side 



TASK/DEVICE DRIVER 
ON PDP-11 



INTERRUPT side 



Figure 6-1 
SPOOLER Schematic 



NOTE 



The logical structure of the 'task call 
service routine' and the 'task interrupt 
service routine ' depends upon whether the 
task is an input or an output task. The 
'task call service routine' is the de- 
spooler for an input task and it is the 
spooler for an output task. The 'task 
interrupt service routine' is the spooler 
for input tasks and it is the despooler 
for output tasks . 



"There is no program logic or coding connections between the device 
driver tasks under PIREX and the spooler task. All communication to 
the device driver is through the TCB only. 
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3. Add code in the RKINT routine to handle the disk read or 
write operations for this task. 

4. Code a routine to setup TCB and issue request. 

5. Add a TCB for this task. 

6. Add code to the BEGIN directive processing routine to 
initialize, and, (if necessary) startup this task. 

7. Add code to the END directive processing routine to clear 
up this task. 

8. Add code to the 'request dispatcher' to dispatch calls to 
this routine. 

9. Add code to the 'device interrupt dispatcher' to dispatch 
interrupts from this device. 

10. Increase the size of TABLE by 6 words if not sufficient. 

11. Add entries of frequently addressed tags to the central 
address table. 

12. Update DEVCNT and DEVSPP to ensure sufficient buffers and 
TCBs. 

13. Update FINDBK routine. 



The remaining sections describe the above steps in more detail. The 
Line Printer spooler task is used as a descriptive example. 



6.1.1 Call Service Routine 

This is the routine that normally processes calls from the handler 
on the PDP-15. For an output task this routine spools data onto the 
disk as indicated in Section 5.3.3. The operations performed by 
this routine are discussed in detail in Section 5.4.2. 

Normally, data from records are copied into a buffer until it is full, 
As soon' as a buffer is full, it is written onto the disk with a 
pointer to the next block; and then a new buffer is obtained. This 
process is continued until a special record that indicates the end_ 
of the file is received. For the Line Printer, this is a record with 
form feed and carriage return characters only. On receipt of this 
record, the call service routine copies this record into the current 
buffer and writes it out; regardless of whether the buf fer _ is _ full 
or not. This is done to ensure complete processing of a distinct 
logical entity, a file. The call service routine sets only the LFB 
entry in the TABLE. It uses the utility routines GETBUF , FINDBK, 
PUTBLK, and DEQP.EQ. 
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6.1.2 Interrupt Service Routine 

Completion of I/O interrupts from the device driver in PIREX is 
processed by this routine. For an output task, this routine 
despools the data onto the device as indicated in Section 5.3.5. 
The operations performed by this routine are discussed in detail in 
Section 5.4.3. 

The interrupt service routine for the Line Printer despools data 
from the buffer onto the device by issuing requests to the task 
running under PIREX. This routine, like other despooling routines 
in the SPOOLER, is double buffered to increase throughput. Pro- 
vision is made in the routine to wait for a block to be read into 
core during heavy disk utilization. This is done using the "block 
in motion" switch. 



6.1.3 Code to Handle the Disk Read/Write Operations 

All spooled tasks must perform certain functions on completion of a 
read/write block disk operation, as. Section 5.5.3 describes in 
detail. 

On completion of a read disk block request the TABLE entries must be 
updated and the Line Printer started up if idle. If the Line 
Printer is busy, control is transferred to the "DONE" section of 
code where the disk TCB is returned to the pool and control is 
relinquished. 

On completion of a "write block on disk" request, the buffer is returned 
and the LSB entry in TABLE is updated. If the Line Printer is idle, a 
request is issued for the Line Printer task to read in the next de- 
spooling block. This is done by supplying the NBNI entry in TABLE for 
the Line Printer. If the Line Printer is not busy or after issuing 
the read request as in read, control is transferred to the 'DONE' 
section of code. 



6.1.4 Routine to Setup TCB and Issue Request 

These operations are performed at several places in the SPOOLER. To 
optimize code this subroutine performs the TCB setup and request 
issuing functions. 

The Line Printer routine performs the following operations (Figure 
5-1) at tag STUPLT: 

Get the address of the LP TCB page 16, lines 18-19 

Go to setup common line 20 

Set the buffer address specified line 31 

in the TCB 



(1) See Section 5.4.7. 
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Reset the REV in the TCB lines 32-33 

Issue the request line 34 

Return control line 35 



6.1.5 TCB 

The format of the TCB used by spooler tasks is almost identical to 
the format of TCBs for tasks running under PIREX, except for the 
disk TCB which has an extra word. The extra word is used to store 
the TCN of the task for which the I/O transfer was requested. 
Another difference is that the TCN present in word '1' of all TCBs 
in the SPOOLER has the unspooled bit set, i.e., TCN' = 2008 "*" '^^^ 
(O-I773) . This is to prevent the request from being queued to the 
SPOOLER. Also, word '0' of all TCBs contains the SPOOLER task code 
instead of the API information. This is to permit PIREX to transfer 
control to the 'device interrupt dispatcher' in the SPOOLER on receipt 
of an I/O completion interrupt from a SPOOLER request. 



6.1.6 Initialization in the BEGIN Routine 

All SPOOLER tasks have to be initialized before starting of spooling 
operations. The initialization normally consists of setting the 
pointers, switches and variables to the right value, obtaining 
buffers, block number on disk, etc. Section 5.5.1 explains these 
operations for the Line Printer in more detail. 



6.1.7 Cleanup in the END Routine 

All SPOOLER tasks have to be cleaned up before termination of spool- 
ing operations. The cleanup for the Line Printer consists of stop- 
ping the LP driver task in PIREX and clearing all pending 
requests in the task's TRL. 

6.1.8 Updating the Request Dispatcher 

The request dispatcher in the SPOOLER contains code to check the TCN 

of the current request being processed and to transfer control to 

the appropriate routine. For the Line Printer (Figure 5-1) this is 
done at: 

Page 6, lines 34-36, 72 



6-4 



6.1.9 Updating the Device Interrupt Dispatcher 

The SPOOLER is informed of completion of I/O requests through the 
PIREX Software Interrupt facility. PIREX calls the device interrupt 
dispatcher, which determines the task that issued the request and 
transfers control to the tasks interrupt service routine. 

For the Line Printer this is done at: 

Page 22, lines 12, 13, 19 



6.1.10 Updating TABLE 

The TABLE contains the complete record of the data being spooled and 
despooled. Each task has a 6 word entry in this TABLE. TABLE size 
must be increased (change the 'BLOCK XXX' statement at page 33, 
line 73) based upon the number of tasks in the SPOOLER. Currently 
there is sufficient space in the TABLE for 3 additional tasks. 



6.1.11 Updating the Central Address TABLE 

Code optimization in a PIC program is done by maintaining a table of 
addresses for frequently used tags. This table contains the unre- 
located addresses of tags at assembly time. These are converted to 
absolute addresses (by adding the SPOOLER first address) by the once 
only section of code in the SPOOLER (Figure 5-1, page 6, lines 12-26) 

For the Line Printer (Figure 5-1) the following tags are present in 
this table: 

LPONCE page 33, line 6 

TABPCB line 15 

LPCBCP line 24 

LPWDIP line 25 

LPCBIP line 36 

LPBMS line 37 



6.1.12 Update DEVCNT and DEVSPP 

To facilitate automatic updating (increase or decrease) of buffers 
and disk TCBs in the SPOOLER based upon the number of tasks in it, 
a conditional parameter exists for each task. 

DEVCNT and DEVSPP are modified for the Line Printer (Figure 5-1) at: 

Page 3, line 13-14 
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Tasks are assembled into the SPOOLER by defining the conditional 
parameters of the form: 

$XX = ZZZZOO 

where 

XX = mnemonic of the task (LP for Line Printer) 

ZZZZ = a bit configuration (0400 for LP - there is a bit for each 
task) 

6.1.13 Updating the FINDBK Routine 

Code is present in this routine to prevent allocation of the disk 
block that is currently being despooled. This is necessary to 
insure proper operation of the spooler because despooling operations 
are halted when CBN = LSB. For the line printer task (Figure 5-1) 
this is done at: 

page 17, lines 89, 90, 97, 98 

6.2 ASSEMBLING THE SPOOLER 

To assemble the SPOOLER with the required task in it, it may be 
necessary to edit the SPOLll XXX source file to supply the appropri- 
ate assembly parameter. To assemble the SPOOLER with the Card 
Reader task also insert the line: 

$CD = 20000 after the sub-title conditional assembly parameters 
(For Plotter insert: $PL = 10000) 

An assembly of the above source (Figure 5-1) will produce a SPOOLER 
with Line Printer and Card Reader tasks. 
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APPENDIX A 
ABBREVIATIONS 

API Automatic Priority Interrupt 

ATL Active Task List 

CAF Clear All Flags 

CAPIn Clear APIn flag in DR15-C (CAPIO = 706104, 

CAPIl = 706124, CAPI2 = 706144, CAPI3 = 706164) 

CBN Current Block Numbers 

CIOD Clear Input/Output done (706002) 

CRP Current Record Pointer 

DOS-15 PDP-15 Disk Operating System 

EV Event Variable 

LFB Last File Block 

LIOR Load Input/Output Register (706006) 

LSB Last Spooled Block 

PC Program Counter 

PIC Position Independent Code (can be loaded any- 

where in memory) 

RDRS Read Status Register (706112) 

REV Request Event Variable 

RSX-15 PDP-15 Real Time System Executive 

SAPIn Skip on APIn flag in DRll-C (SAPIO = 706101, 

SAPIl = 706121, SAPI2 = 706141, SAPI3 = 706161) 

SIOA Skip on Input/Output data Accepted (706001) 
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TCB Task Control Block 

TCBP Task Control Block Pointer 

TRL Task Request List 

UC15 UNICHANNEL-15 
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APPENDIX B 
CURRENTLY IMPLEMENTED TCBs 

The general format for all task control blocks is as follows: 



,15 


8.7 


0, 


• " 1 ■■■'■■ -■ ■ 1 

! ATA ; ALV ; 

• •'»»» I 1 I 1 1 1 1 1 1 1 I 


! FCN jsj TCN i 


i REV i 
1 • 1 1 1 1 1 1 1 1 1 1 1 1 • I 1 




Other data 


1 
1 
1 



word 
word 1 
word 2 
word 3 

/ . y 

/ particular ^ 

I to this task ; word n 
' « ' » t t I I t I t I I , I I , 



ATA 
ALV 

FCN 



TCN 



REV 



PDP-15 API interrupt vector address 

PDP-15 API interrupt priority level. Must be 0, 1, 2, 
or 3 (unless FCN = 3) . 

Function to perform upon completion of this request. 
Valid values are: 

000 Interrupt PDP-15 at location ATA, priority ALV. 

001 Do nothing (except set REV) 

003 Cause software interrupt to the PDP-11 task whose 
task code number is in ALV. 

if this request may be spooled. 

1 if this request may not be spooled. 

Task code number of the task which is to process this 
request 

Request Event Variable. Initially zero, set to a non- 
zero value to indicate completion of the request. 
The meaning of the various return values is described 
below. 
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Returned REV value: 



-200 



-300 



-777 



Successful (normal) completion. 

Non-existent task. The task code number (TCN) does not 
correspond to any task currently in the PIREX system. 

Illegal ALV value. The request may or may not have been 
performed - see individual request descriptions. The 
PDP-15 is interrupted at API level 3. 

Node Pool empty. PIREX is temporarily out of nodes, and 
therefore is unable to insert this request into the 
appropriate list. Reissue the request after a brief 
delay. 

Other The meanings of other returned REV values are given with 
the descriptions of the task control blocks to which they 
apply. 

In the sections that follow, many of the task control block diagrams 
show S and TCN combined into a single 8-bit quantity. This is done 
to indicate that the particular task may never be spooled, and thus 
S is always 1. 

B.l STOP TASK (ST) 

This task provides the capability to stop one or all tasks in PIREX. 
Stopping a task may immediately abort processing of the request the 
task is currently processing, and also any PDP-15 originated requests 
on the task request list. The format of the task control block for the 
stop task is as follows (note that this is a non-standard task 
control block) : 



,15 




8.7 




IS, 


1 ' ' ' 1 
; unused ! 
1 1 1 1 1 1 1 1 • 1 1 1 1 • 1 t • 


[A! 

1 1 1 


TCN 
1 1 • 


1 

1 

1 

1 1 1 1 1 


200 
1 1 1 


1 

1 

1 

1 1 1 


1 ' "' 1 

; REV ; 

1 1 1 1 1 1 1 1 • 1 f 1 1 1 • I 1 



word 
word 1 
word 2 



TCN 



If zero, this is a stop all tasks directive. 



If set unconditionally, abort the current request for this 
(or all) task(s). If clear, allow the request currently 
being processed by this (or each) task to complete if and 
only if the request originated from the PDP-11. Only 
PDP-15 requests on the task request list will be aborted 
regardless of the setting of this bit. 
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All requests which are aborted via this request will never complete; 
the request event variables (REVs) of such requests will never be 
set to a non-zero value. A permanent task which is stopped via this 
request will be placed in the wait state; a temporary task will be 
placed in the stopped state. 

Returned REV values : 

1 Successful completion 

-600 Task to be stopped is not connected to PIREX. 
Only applicable when TCN 7^ . 



B.2 SOFTWARE DIRECTIVE TASK (SD) 

Descriptions of the software directives, including details of their 
task control block formats, are given in Section 3.6, Software 
Directive Processing. The general task control block format for all 
software directives is as follows : 



,15 


8.7 


m. 


[ ATA ; ALV j 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


[ FCN ; 2ffl \ 
1 1 1 1 1 1 • 1 1 1 1 1 • 1 1 1 1 


! REV 1 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 I 1 


1 1 1 


opR ; 
1 1 1 1 1 1 






Contents depend 



word ji 

word 1 

word 2 

word 3 

word 4 

/ upon ;^ 

I directive J word n 



OPR Indicate the exact operation (directive) to be performed. 
For details see Section 3.6. 

Returned REV values: 

1 Successful completion 

-400 Invalid OPR (directive/operation code) values. 

Other See individual directive description in Section 3.6, 



B.3 DISK DRIVER TASK (RK) 

The disk driver task provides the capability of using the RK05 cart- 
ridge disk system. Task control blocks directed to this task have 
the following format: 
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,15 8,7 0. 


1 1 - - , 

', ATA ; ALV ; 

1 • I 1 1 • t • 1 1 1 • 1 1 1 r 1 


; FCN ; 2|3f2 ; 

t 1 1 1 1 1 1 1 1 1 1 • 1 1 1 1 1 


; REV ; 

I 1 1 • 1 1 1 1 1 1 1 1 1 1 1 1 1 


I Block Number J 
1 • 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


! REL + MSMA ; 
1 1 1 1 1 1 I • 1 1 1 1 1 1 1 1 1 


; LSMA ; 
1 1 1 1 • 1 1 1 1 1 • 1 1 1 1 1 1 


J Word Count ; 
• 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


! unused I Unit; Function ', 
1 i I f 1 1 1 • 1 1 1 1 1 1 1 1 1 


! RKCS • 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


; RKER ; 

1 • 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


; RKDS ', 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 



word 
word 1 
word 2 
word 3 
word 4 
word 5 
word 6 
word 7 
word 10 
word 11 
word 12 



ATA 

ALV 

REV 

Block Number 

REL 



Usually 047g 

Usually 000 

Set to 1 upon completion regardless of errors 

Disk block number to transfer 

000000 if request comes from PDP-15 
100000 if request comes from PDP-11 



MSMA 



LSMA 



Word Count 



Unit 



Function 



Core address at which to begin transfer - most 
significant bits 

Core address at which to begin transfer - least 
significant bits. 

Two's complement of the number of words to 
transfer 

Disk drive (unit) number on which to perform 
the operation. 

Operation to be performed. 
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Valid values are: 

002 Write 



004 



Read 



006 Write check 
012 Read Check 



016 



Write lock 



For detailed descriptions of the functions, see the RKll-E 
Disk Drive Controller Manual (DEC-11-HRKDA-B-D) . 

RKCS Upon completion of the operation, these three 
RKER words are loaded from the corresponding disk 
RKDS controller registers. See the RKll-E Disk 

Drive Controller Manual (DEC-ll-HRKA-B-D) tor 

a description of their meaning . 

If the request originates from the PDP-11, LSMA is the 16-bit PDP-11 
byte address at which the transfer is to begin. If the request 
originates from the PDP-15, MSMA and LSMA together are the 17-bit 
PDP-15 word address at which the transfer is to begin. Upon comple- 
tion of the transfer, REV is always set to 1, regardless of whether or 
not the transfer succeeded. RKCS, RKER, and RKDS must be examined 
to determine whether the transfer succeeded or an error occurred. 

Returned REV Values: 

1 Request complete. Request may or may not have succeeded. 

-300 Illegal ALV value. Request complete. 



B.4 LINE PRINTER DRIVER TASK (LP) 

The task control block format is as follows: 



15 



8,7 



1 1 

; ATA ; ALV 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


1 word 


; FCN ;s; 00 a 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


I word 1 


; REV 

1 1 1 1 1 1 1 1 1 1 • 1 1 1 1 


I word 2 


1 REL 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


; word 3 


1 Buffer Address 

1 1 1 1 1 f 1 1 1 1 1 1 1 1 1 


; word 4 


unused 
1 1 1 1 1 1 • 1 1 1 1 1 1 1 1 


I word 5 


i Status Flag 

1 1 1 f 1 1 1 1 1 1 1 f 1 1 1 


1 word 6 
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ATA 
ALV 
S 

REL 



Usually 0563 

Usually 002 

Usually (indicating spooled operation) 

000000 If request originates from PDP-15 
100000 If request originates from PDP-11 



Buffer Address PDP-11 byte address, if request is from PDP-11 
PDP-15 word address, if request is from PDP-15 

Status Flag Unused if request is spooled. 

Cleared to zero at beginning of request proces- 
sing and set to 000001 at completion if request 
is not spooled. 

The buffer address argument refers to a line buffer of the following 
format : 



15 



Mode 
t I I I I i I 



LF 



Count 

I ' ' f ! ' f 



unused 



Data 



word 
word 1 
word 2 

word n 



t I I t I t I t t I I I I t I I t 



Count 



Mode 



LF 



Data 



The number of bytes of data in the buffer. 
Excludes the four byte header. 

Indicates transfer mode. Legal values are 

lOPS ASCII 

1 Image 

May be altered by the driver. 

One line of output for the line printer. 



The data sent to the line printer driver is a series of independent 
bytes. If a byte is positive, it represents a 7-bit ASCII character. 
If a byte is negative, it represents some number of spaces, the 
number of spaces being equal to the absolute value of the byte. If 
a line is in image mode, only the characters represented by the data 
bytes are output. If a line is in lOPS ASCII mode, a line feed is 
output before the beginning of the line unless the first character 
of the line is a carriage return or form feed. A carriage return is 
always output at the end of lines in lOPS ASCII mode. A line contain- 
ing just the characters carriage return followed by form feed causes 
no output in either mode, but rather represents a .CLOSE (end of file) 
operation. 
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Line printer errors are not reported via returned REV values. The 
only line printer error which can occur is for the printer to go off 
line (become not ready) . The line printer driver reports this by 
placing the value 4 in the device error byte of its entry in the 
DEVST table (see Section 3.6.4 on the Error Status Report Directive). 
When the printer comes back on line the driver clears the device error 
byte and outputs the line. Upon completion the REV is set to 1. 

Returned REV Values: 

1 Successful completion 

-300 Illegal ALV value. Action may or may not 
have been taken. 

-600 Spooler shut dovm. No action has been taken. 



B.5 CARD READER DRIVER TASK (CD) 

The task control block format is as follows: 



.15 8,7 0, 


1 1 1 

; ATA ; ALV ; 
1 1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


; FCN ;s; 005 ; 
1 1 • 1 1 1 1 1 1 1 t • 1 1 1 1 1 


; REV ; 
1 1 1 1 1 • 1 1 1 1 1 1 1 1 1 1 1 


} unused ', 
1 1 1 1 f 1 1 1 1 1 1 1 1 1 1 1 • 


; Buffer Address \ 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 f 



word 
word 1 
word 2 
word 3 
word 4 



ATA 
ALV 
S 



Usually 055g 

Usually 001 

Usually (Indicating spooled operation) 



Buffer Address PDP-11 byte address, if request is from PDP-11 
PDP-15 word address, if request is from PDP-15 

The buffer address argument refers to a card buffer of the following 
format : 



word 
word 1 
word 2 



,15 


8.7 





Byte Count 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


Checksim 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 



Data 



/ 

J v7ord n 



I I I I I I I I I I I t t I I I e 
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Byte Count 
Checksum 

Data 



Always 80, Q 

Word checksum of the buffer (including the byte 
count) 



80 



,Q bytes (40j^Q words) of data 



The card data is not in ASCII. Each card column occupies one byte 
in the following format: 



I I I 



bits 0-2 Contents of rows 1-7 encoded as follows: 
no pxmches in rows 1-7 
row 1 punched 
row 2 punched 
row 3 punched 
row 4 punched 
row 5 punched 
row 6 punched 
row 7 punched 

3 Indicates row 8 pimched 

4 Indicates row 9 punched 

5 Indicates zone punched 

6 Indicates zone 11 punched 

7 Indicates zone 12 punched 



bit 
bit 
bit 
bit 
bit 



001 
010 
011 
100 
101 
110 
111 



NOTE 

All combinations of punches which cannot 
be specified in this manner are illegal. 



Any errors that occur are not reported by returned REV values. 
Instead the lOPSUC numeric error code is placed in the device error 
byte of the card reader's entry in the DEVST table (see Section 
3.6.4, Error Status Report Directive). When the error condition is 
remedied, the driver clears the device error byte and the read opera- 
tion continues. Ultimately the read completes and REV is set to 1. 

Returned REV Values: 
1 



-300 
-700 



Successful completion 

Illegal ALV values. Action may or may 
not have been taken. 



Spooler shut down, 
No action taken. 



(Despooling not enabled) 
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DOS-15 V3Bj2i00 Update Document 
B.6 PLOTTER DRIVER TASK (XY) 

The task control block format is as follows: 



,15 




8,7 




0, 




ATA 
1 1 1 1 


1 1 1 1 


ALV 
1 1 1 


1 1 1 




FCN 
1 1 1 1 


is; 

rill 


1 1 1 


1 1 1 


; REV ; 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


; REL ; 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


I Buffer Address J 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 



word 
word 1 
word 2 
word 3 
word 4 



ATA 
ALV 
S 

REL 



Usually 065„ 

o 

Usually 003 

Usually (indicating spooled operation) 

000000 If request is from PDP-15 
100000 If request is from PDP-11 



uUj.j.er A>j.^ress PDP-11 bytt: dddress, if request is from jr'UJr'-ll 
PDP-15 word address, if request is from PDP-15. 

The buffer address argument refers to a data buffer of the following 
format: 



,15 




8,7 


0, 


• 1 


Mode 
1 1 1 1 


! Count 
1 1 1 1 1 1 1 1 1 


1 1 


1 1 
1 unused } 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 f 1 1 








1 
1 
1 



Data 



word 

word 1 

word 2 
/ 
/ 
I word n 



I I I I t f I I I I I I I 



Count 



Mode 



The number of bytes of data in the buffer. 
Excludes the four byte header. 

Indicates the function to perform and/or the 
mode in which the data should be interpreted 
Valid modes are: 
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1 Line mode 

2 Character mode 

3 Initialize 

4 Pen select ■ ' 

377 End of file 

Line mode data takes the following form. Each line is represented by 
a pair of data words. The first word is the incremental change in the 
X coordinate from the beginning to the end of the line, the second 
word the change in the Y coordinate. If this is to be an invisible 
line - i.e., it is to be drawn with the pen raised - 100000^ should 
be added to the first word (change in X) . 

Character mode data is a series of ASCII characters to be drawn, one 
character per byte. Initialize requires 8 words of data which 
specify the character size and orientation for character mode plotting, 
The pen select operational' takes two words of data. The first is the 
pen number for the XY311 plotter (1, 2, or 3). The contents of this 
word are destroyed by the pen select operation. The second word must 
be zero. An end of file merely raises the pen. (It also forces the 
XY data through the spooler buffers if spooling is enabled.) 

Returned REV Values: 

1 Successful completion 

-300 Illegal ALV value. Action may or may not have been 
taken. 

-600 Spooler shut down. No action taken. 



(1) This is used only by the XY311 plotter, 
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APPENDIX C 
UC15 RELATED ERROR MESSAGES 



lOPSUC 



YYY 



XXXX 



Where YYY denotes one of the following 



EST 


Stop all I/O 


ESD 


Software Driver 


RKU 


Disk Cartridge 


DTU 


DEC TAPE 


LPU 


Line Printer 


CDU 


Card Reader 


PLU 


Plotter 


ESP 


Spooler 


EMA 


MACll 



Task 



XXXX denotes one of the following: 

3 - ILLEGAL INTERRUPT TO DRIVER 

4 - DEVICE NOT READY 
12 - DEVICE FAILURE 

15 - SPOOLER FULL WARNING MESSAGE 

20 - SPOOLER DISK FAILURE - SPOOLING DISABLED 

45 - GREATER THAN 80 COLUMNS IN 
CARD 

55 - NO SPOOLER BUFFERS AVAILABLE 

72 - ILLEGAL PUNCH COMBINATION 
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74 - TIMING ERROR - CARD COLUMN 
LOST - RETRY CARD 



75 - HARDWARE BUSY - DRIVER NOT 

76 - HARDWARE ERROR BETWEEN 

CARDS 

77 - UNRECOGNIZED TASK REQUEST - 

DEVICE NOT PRESENT 

400 - SPOOLER EMPTY - PDR-15 INPUT 
REQUEST PENDING 



Additional lOPS error messages: 

Error Code 

25 XY plotter - value too large for plotting, 

27 XY plotter - mode incorrect. 

200 Non-existent task referenced. 

300 Illegal API level given (illegal values 

are changed to level 3 and processed) . 

400 Illegal directive code given. 

500 No free core in the PDP-11 local 

memory . 

600 ALT node for this TCN missing. 

777 Request node was not available from the 

POOL; i.e., the POOL was empty and the 
referenced task was currently busy or the 
task did not have an ATL node in the 
Active Task List. 



J-42 C-2 



DOS-15 V3Bj2f00 Update Document 

APPENDIX D 
UNICHANNEL-15 OPTION 

NOTE 

The following applies ONLY to the con- 
struction of a DOS-15 V3AJ3J30 UNICHANNEL 
option system. This is required as a 
prerequisite to the construction of a 
DOS-15 V3BJZfj2f0 option system. See the 
DOS-15 V3B0j2ljZf Update Document DEC-15- 
0D3BA-A-D for information on DOS-15 
V3BJZf0jZf option system construction. 

WARNING 

When using SGEN with the UC15 option 
DO NOT reply yes to the "UC15 CONFIG?" 
question. 

The UC15 OPTION system is designed to allow users with multiple types 
of disk devices to use the RF or RP disk as a systems device in con- 
junction with the UC15. The DOS-15 Vnn UC15 OPTION tape DEC-15- 
ODUCA-A-UC^ must be used. 

The following example sequence shows the installation of the 
UNICHANNEL software on an RP system. The installation on a RF disk 
system would be similar, as would the use of magtape instead of 
DECTAPE . 

1, Load and start the DOSSAV paper tape. Restore the two 
DECTAPES onto the disk pack. 

DOSSAV V3A000 

INPUT DEVICE? DT 

UNIT #? 0_ 

OUTPUT DEVICE? DP 

UNIT #? 

DATE CREATED: 08-AUG-74 

TAPE DONE. MOUNT ANOTHER 

1 

DOSSAV V3A000 

INPUT DEVICE? 

2. Load and start the supplied RPBOOT tape. 



(1) If the system has magtape, use magtape DEC-15-ODUCA-A-MC9 or 
DEC-15-ODUCA-A-MC7 . 
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3. Assemble the RPBOOT XXX source with the assembly parameter 
UC15 = with paper tape binary output. This special 
bootstrap is to be used whenever the PDP-11 monitor PIREX 
is running, and only then . 

4. MICLOG SYS 

5. Mount the UC15 OPTIONS tape on DTO or MTO"'" 

6. Patch the special RESMON, DOSNRM, DOSBCD, and SGNBLK, located 
on the UC15 OPTIONS tape onto the system. 

$PATCH^ 

PATCH Vnn^ 

> RESMON^ 

>READ RESMON^ 

^ READ DOSBCD^ 

>READ SGNBLK RPA^ (for RF use ' SGNBLK RFA ' ) 

> D0S15 ^ 

READR 16077 DOSNRM ^ 

EXIT ^ 

'^ NOTE 

The PDP-15 will halt on this EXIT. 

7. Load ABSLll XXX paper tape (see Section 2.2.2). 

8. Load and start the supplied PIREX XXX PDP-11 MONITOR paper 
tape (see Section 2.2.2). 

9. Reload the DOS System using the special RPBOOT tape pro- 
duced in step 3. This tape will be used for all future 
boots while the UC15 option is being used. 

1 n . MTrLnc Qvc 



J.%^J^L/\3 ilD JL ^^ 



11. Run SGEN to install MACll as a systems program. 
H. ADD SYS PROG? (N) Y_ 
PROG NAME[ ] MACll 
# OF BLOCKS [ ] 40 
OVERLAY NAME[ ] 
BUFFS [0] 2_ 



(1) For magtape use the MTA handler 
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DAT SLOTS: 

> 

12. Run PATCH to place proper values in SGNBLK for MACll. The 
values typed by the system after the slash are current disk 
contents, and may not match the example typout given. Type 
the values after the >'s, i.e., 1, 17625, and 17500. Follow 
the typins with ALT-MODES. 

DOS-15 V3A000 

$ patch/ 

PATCH V3A000 
> MAC11 >^ 
>FA ). 
>00237/001250>l 

>ps/ 

00240/016331> 17625 

00241/001415> 17500 
> EXIT y 

13. LOGIN PER 

14. PIP the MACll components from DTO or MTO to disk. 

DOS-15 V3A000 

$ PIP 

DOSPIP V3A000 

> T DP,-* — DTO MACIMG 006,MACINT 014 

> tc 

15. Assemble MACIMG and MACINT. (See Section 2.3,1 for more 
details. ) 

The PDP-11 Peripheral Processor may have varying amounts of local 
memory. The default value is 8K, which requires no assembly param- 
eters"! For 12K define LM12K = 0, for 4K define LM4K = 0. 

DOS-15 V3A000 

$MACRO 
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BMACRO-15 V3A000 
>BP— MACIMG 006 
LM12K=0 
TD EOT 

END OF PASS 1 
SIZE=00422 NO ERROR LINES 
BMACRO-15 V3A000 
>BP-*-MACINT 014 
LM12K=0 
TD EOT 

END OF PASS 1 
SIZE=17617 NO ERROR LINES 
BMACRO-15 V3A000 

rc 

DOS-15 V3A000 

The system area on disk for MACll requires a PDP-15 core image, 
and a PDP-11 core image. 

16. Load the PDP-11 image from paper tape by running the binary 
MACIMG. (See Section 2.3.1 for exact details of proper 
tape selection.) If the system has API - issue a 

DOS API OFF command first. 
DOS-15 V3A000 

$GLOAD 

BLOADER V3A000 

>^*- MACIMG (aL 

DONE 

DOS-15 V3A000 

17. MICLOG SYS 

18. Patch MACINT, the PDP-15 portion of MACll, into the system 
in the normal manner » 

DOS-15 V3A000 

$A DP <PER> -10 
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$PATCH ^ 

PATCH V3A000 

> MAC11 

> READ MAC INT 

> EXIT 

DOS-15 V3A000 

19. LOGIN PER 

20. PIP the PIREX source onto the disk for editing. 



DOS-15 V3A000 

$PIP 

DOSPIP V3A000 

>T DP^* DTP PIREX XXX 

21. See Section 2.3.2 for the details of reconfiguring PIREX 
into a version specific to your exact configuration. Do 
this reconfiguration now. 

22. PIP the sources for the UNICHANNEL handlers from DTO or MTO 
onto disk. 

DOS-15 V3A000 

$ PIP 

DOSPIP V3A000 

> T DP ,-*— DTO LPU. 020, XYU. 032 

TC 

DOC- 15 V3A0OO 

Note that the card reader source CD. DOS is already on <PER>. 

23. Assemble the sources to binaries. Note that the card 
reader source requires the assembly parameter UC15 = 0. 

$ MACRO 

BMACRO-15 V3A000 

> B<-LPU. 020 

END OF PASS 1 

SIZE=00657 NO ERROR LINES 
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BMACRO-15 V3A000 

> B'*"XYU. 032 

END OF PASS 1 
SIZE=01150 NO ERROR LINES 
BMACRO-15 V SAO 00 
>BP-*-CD.DOS 031 
UC15=0 



Tp EOT 

END OF PASS 1 
SIZE=00613 NO ERROR LINES 
BMACRO-15 V3A000 

tc 

DOS-15 V3A000 

24. MICLOG SYS 

25. PIP the handler binaries to DP <IOS> . Note especially the 
name changes. The sources are called XXU for designating 
UNICHANNEL sources. The handlers, however, must be named 
XYA, CDB, LPA. 



>T 


DP 


<IOS> XYA. 


BIN-^DP 


<PER>XYU. BIN 


>T 


DP 


<IOS> LPA. 


BIN— DP 


<PER> LPU. BIN 


>T 


DP 


<IOS> CDB. 


BIN-^DP 


<PER> CD. DOS BIN 



26. Transfer the three RK handlers from the UC15 OPTIONS tape 
to the <IOS> UIC. 

> T DP <IOS> , , ^ DTO RKA. BIN,RKB. BIN,RKC. BIN 

27. It is now necessary to run SGEN to install new SKIP lOTS 

/all ■fr^ki'i'r' /^£aTr-i r^c^c \ =>r>/^ t^^it.t V»ai^/^T«>v m r=iWin.c« /"DV Trs •►-k *^ V\7 N -! *-» *- 1 

system. 

B ALTER I/O DEVICES OR HANDLERS? (N) Y 

DELETE DISCARDED HANDLERS? (Y) Y 
TO BE KEPT 
PR?($) $ 

LP? ($) Y 
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LPA? (Y) 

NEW HANDLERS: 
> 

LPSF=706501? (Y) Y_ 
NEW SKIPS: 

> LPSK=706141 
> 

CD? ($) Y_ 

CDB? (Y) 

NEW HANDLERS? 
> 

CRSI=706701? (Y) Y_ 
CRSD=706721? (Y) Y_ 
NEW SKIPS: 
>CRSF=706121 



> 




C. ADD NEW DEVICE? 


(N) Y 


DEVICE CODE[ ] RK 




NEW HANDLERS: 




>RKA 




>Kl\r> 
>RKC 




> 




NEW SKIPS: 




>RKSF=706101 





> 

C. ADD NEW DEVICE? (N) JY_ 
DEVICE CODE[ ] XY 
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NEW HANDLERS: 

> XYA 

> 

NEW SKIPS: 

XYSF=706161 
> 

28. Halt both machines. 

29. Load ABSLll. 

30. Load in the new PIREX tape (specific to your machine) 

31. Bootstrap DOS with the modified RPBOOT. 
The system is ready to use UNICHANNEL peripherals. 

It should now be DOSSAVed. This system will operate only 
with the UNICHANNEL-15 peripheral processor. If PIREX is 
not executing, this system will not function. 
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GLOSSARY 

Active Task 

An Active Task is one which: 

1. is currently executing 

2. has a new request pending in its queue 

3. is in a wait state 

4. has been interrupted by a higher priority task. 

Active Task List 

A priority-ordered linked list of Active Tasks used for scheduling 
tables. The ATL is a queue consisting of one node for each Active 
Task in the system. 

Busy/Idle Switch 

A two-word storage area used to save TCBP's when processing a request. 
Every task has a two-word Busy/Idle Switch. If the two words are zero, 
the task is currently not busy and is able to accept and process a new 
request. Bit 15 of the first word is used by the system to determine 
if the TCB came from a PDP-15 or PDP-11 request. If zero, the request 
came from the PDP-15, otheirwise it came from the PDP-11. 

Call Side 

All spoolers have a 'call side' where a set of data is passed by the 
caller to the spooler (for output spooled devices/tasks) or data is 
passed by the spooler to the caller (for input spooled devices/tasks) . 
This is done only when a request is made to the spooler. 
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Context Save 

The storing of all active registers, including the program counter 
(PC) and program status (PS), on the current task's stack. These 
saves are done when higher priority tasks interrupt lower priority 
ones and by device driver interrupt routines to allow them free use of 
the general purpose registers. 



Context Switching 

The process of saving the active registers belonging to the current 
task executing (a context save) , determining a new task to execute, 
and finally restoring the registers belonging to it. 



Deque 

Deque, pronounced deck, is a double-ended queue consisting of a list- 
head and list elements, circularly linked by both forward and backward 
pointers. Deques (linked lists) are used, instead of tables, to store 
TCB pointers and ATL information. The list elements (commonly called 
nodes) are initially obtained from a pool of empty nodes called the 
POOL. Nodes consist of listhead and 2 words of data used to store the 
caller's TCB pointer or ATL information. When a node is needed, it is 
removed from the POOL and queued to the referenced task deque of the 
ATL. When a node is no longer needed, it is zeroed and returned to 
the POOL. 



Dequeue 

Remove a node from a queue. 

Directive 

A task which performs some specific operation under PIREX, e.g., con- 
necting and disconnecting tasks. 



Driver 

A task which controls a hardware device. Drivers usually consist of 
necessary program only rudimentary operations (e.g., read, write or 
search) . The more complex operations such as file manipulations and 
syntax checking are usually performed by handlers. 



Event Variable 

A word or variable used to determine the status of a request. The 
Event variable is set to indicate successful completion, rejection, 
status, or a request still pending condition. 
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Interrupt Side 

All spoolers have an 'Interrupt Side' where data is passed by the 
spooler to the device/tasks (for output spooled device/tasks) or data 
is passed from the device/tasks to the spooler (for input spooler 
devices/tasks) . This occurs whenever output of data is complete or 
input data is ready. 



Linked List 

A deque consisting of nodes and listhead used to store system informa- 
tion. An empty list consists of only a listhead. 



Listhead 

A two-word core block with forward and backward pointers pointing to 
the next and previous list node or to itself if empty. The listhead 
is a reference point in a circularly-linked list. 



Local Memory 

Core memory only addressable by the PDP-11. This is ordinary 16-bit 
PDP-11 core memory. 



Node Manipulation 

The process of transferring nodes from one deque structure to another. 



Nodes 

The list elements of a deque. All nodes consist of listhead, followed 
by 2 words of data (list elements) . 



Nul Task 

The Nul Task is a task which runs when no other task can. It consists 
of only PDP-11 WAIT and BR Instruction to increase UNIBUS operations. 



Permanent Task 

A task in PIREX is said to be a permanent task if it is assembled into 
PIREX, has space in all PIREX system tables and has a fixed task code 
number. 
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POOL 



A linked list of empty four-word nodes for use in any deque in the sys- 
tem. The POOL is generated at assembly time and currently has 20 
decimal nodes available. 



Pop 

To remove an Item (word) from the current task's stack. 

Push 

To put an item (word) onto the current task stack. 

Queue 

To enter into a waiting list. Queues in PIREX consist only of deque 
structures. 

Scheduling 

The process of determining which task will be executed next. The 
operation is based on a priority ordered list of active tasks in the 
system (ATL) . 

Shared Memory 

Core memory addressable by both the PDP-15 and PDP-11. The shared 
memory is ordinary 18-bit PDP-15 memory. 

Spare Task 

A task that runs under PIREX is said to be a temporary task if it is 
not assembled into pIREX, has space in all PIREX system tables, does 
not have a fixed task code number and its start address is not fixed. 

The core occupied by the temporary tasks is not freed unless the tasks 
are disconnected in the order in which they were connected. 



SPOLSW 

This is a register in PIREX which contains the spooler control and 
status switches as indicated below. 
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BITS 0-7 Device busy Idle switch 
'0' if idle and '1' busy 



BIT LP 

1 CD 

2 PL 

3-7 UNUSED 

BITS 8-15 Spooler State/Function switches 

•0' if disabled and '1' if enabled 

BIT 12 DESPOOLER 

13 SPOOLER 

14 SPOOLING 

15=1 SPOLll PROGRAM CONNECTED TO PIREX 

=0 SPOLll PROGRAM NOT CONNECTED TO PIREX 



Task 



A PDP-11 software routine capable of being requested by the PDP-15 or 
PDP-11 through the PIREX software system. The task may be a device 
driver, a Directive, or just a software routine used to carry out a 
specified function. A task must have the format shown in Figure 2-1. 



Task Code Number 

All tasks in the PIREX system are differentiated by a numbering system 

rather than by name. Task Code Numbers are used in TCBs and are cur- 
rently assigned as follows: 

CODE 

-1 CL task 

200 ST task 

201 SD task 

202 RK Driver task 
20 3 DT Driver task 

4 LP Driver task 

5 CD Driver task 

6 PL Driver task 

7 SPOOLER task 

11 currently not used 

12 currently not used 

13 currently not used 
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TCB - Task Control Block 

A set of contiguous memory locations (minimum of three) which contain 
all necessary information for a task to complete its request. The 
contents of the TCB must be defined prior to the request by the 
requesting program (e.g., a PDP-15 program). 

A pointer to the TCB (called a TCBP) is then passed to the PDP-11 via 
the LIOR instruction in the PDP-15 or the IREQ macro in the PDP-11 to 
actually initiate the request. 



TCBP - Task Control Block Pointer 

A pointer to a TCB. This pointer is passed to the PDP-11 either via 
the LIOR instruction in the PDP-15 or the IREQ macro in the PDP-11 
when initiating a request to PIREX. 
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INDEX 



ABORT requests, 4-32 

ABSLll, 1-1, 2-1 

ABSLll loading, 2-2 

ABSLll paper tape, 1-2, 2-1 

ABSLll starting addresses, 2-2 

Absolute tape, 2-2 

Active task, Glossary-1 

Active task list, Glossary-1 

Active Task List ATL, 3-9 

Address, API trap, 3-6 

Address, restart, 2-1 

Address (TEVADD) , task starting, 3-16 

API trap address, 3-6 

Assembling spooler, 6-6 

ATL nodes, 3-9 

ATL node pointer (ATLNP) , 3-13 



Background task/priorities, 4-2 

Begin routine, 6-4 

BITMAP, 5-5 

Busy/Idle switch, Glossary-1 



Call service routine, 6-2 

Call side, Glossary-1 

Card reader, 2-8 

Card reader driver task (CD) , B-7 

Card reader errors, 2-9 

Central address table, 6-5 

Checksum error, 2-2 

Clock request table (CLTABL) , 3-14 

.CLOSE function, 4-15 

Code number, task, 3-7 

Common memory, 1-3 

Components 

DOS-15, 2-10 

PIREX, 3-3 

RSX-PLUS III, 2-11 

spooler, 5-2 

UC15, 2-10 
Connect task directive, 3-27 
Context save, Glossary-2 
Context switching, Glossary-2 
Control block - TCB, task, 3-6 
Core status report directive, 3-29 



Deque, Glossary-2 
Dequeue, Glossary-2 
Design, spooler, 5-1, 5-2 
Despooling, 5-28 
DEVCNT, 6-5 
Device 

drivers, 3-3 

error status table (DEVST) , 3-15 

handler, DOS UNICHANNEL, 4-5 

handlers, 4-5 

interrupt dispatcher, 5-3 



Device (cont.) 

interrupt service routines, 5-3 

priorities, 4-2 
DEVSPP, 6-5 
DEVST table, B-8 
Directive, Glossary-2 

core status report, 3-29 

error status report, 3-30 

handling, 3-18 

processing routines, 5-3 

spooler status report, 3-31 
Disconnect task directive, 3-26 
Disk 

cartridge errors, 2-8 

driver task (RK) , B-3 
Dispatcher, device interrupt, 5-3 
DOS 

UNICHANNEL device handler, 4-5 

DOS-15, 2-1 

components, 2-10 

loading, 2-2 
DOSSAV, 2-1 
Driver assembly, 4-41 
Driver, Glossary-2 



EDIT, 1-2, 2-5 
End routine, 6-4 
Error 

handling, 2-8 

status report, directive, 3-30 
Errors 

card reader, 2-9 

disk cartridge, 2-8 
Event variable, Glossary-2 
Execution, 2-1 



Format TCB, 6-4 
FINDBK routine, 6-6 
Function, .CLOSE, 4-15 
Function code, 3-7 



Handlers 

device, 4-5 

PDP-15 UNICHANNEL, 2-7 
Handling, error, 2-8 
Hardware, peripheral processor, 1-5 
Hardware Read In mode, 2-1 
Hardware system, UNICHANNEL-15, 
1-2, 1-3 



Illegal punch combination, 2-9 
Installation 

permanent task, 4-4, 4-5 

temporary task, 4-4 
Internal tables, 3-16 
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Interrupt, 4-14, 4-32 
link, 1-4 

service routine, 6-3 
side, Glossary-3 



Level table, 3-15 

Line printer driver task (LP) , B-5 

Linked list, Glossary-3 

List, active task, Glossary-1 

Listhead, Glossary-3 

Listheads (LISTHD) , TRL, 3-14 

Loading, 2-1 

ABSLll, 2-2 

DOS-15, 2-2 

PIREX, 2-2 
Local memory, 1-3, 2-1, Glossary-3 
LP despooling, 5-28 
LP spooling, 5-26 



MACll, 1-1, 2-4, 3-3 
MACll assembler, 1-2 
MACRO-15, 1-2, 2-1 
Memory , 

common , 1-3 

local, 1-3, 2-1 
MX15-B memory bus multiplexer, 1-6 



Nodes , Glos sary- 3 

Node manipulation, Glossary-3 

NUL task, Glossary-3 



Operating sequence, 3-18 



PDP-11, 1-5 

code, 2-1 

requesting task, 4-15 
PDP-15 UNICHANNEL handlers, 2-7 
Peripheral operation, 2-7 

card reader, 2-7 

;3-:<<v „^-^4--^-i Ar,,r^ 2—7 

plotter, 2-7 
Peripheral processor hardware, 1-5 
Permanent task, Glossary-3 
Permanent task installation, 4-4, 4-5 
PER UIC, 2-5 
PIREX, 1-1, 2-5, 3-1 

components, 3-3 

device driver, building, 4-33 

loading, 2-2 
Plotter, 2-8 

Plotter driver task (XY) , B-9 
Pointer (ATLNP) , ATL node, 3-13 
Priorities 

background task, 4-2 

device, 4-2 
Processing request, 3-5 



Processor 
read, 5-28 
write, 5-2! 



Read processor, 5-28 
•READ requests, 4-32 
Read/Write operations, 6-3 
Reconfiguration, UNICHANNEL 

software, 2-4 
Request 

dispatcher, 5-2 

event variable, 3-8 

procedure, 3-17 

processing, 3-5 

transmission, 4-13 

ABORT, 4-32 

.READ, 4-32 

.READ and .WRITE, 4-32 
Restart address, 2-1 
Restarting, 2-2 
Result reception, 4-14 
Routine 

begin, 6-4 

call service, 6-2 

end, 6-4 

FINDBK, 6-6 

interrupt service, 6-3 

device interrupt service, 5-3 

directive processing, 5-3 

task call service, 5-3 

utility, 5-3 
■RSX-PLUS III components, 2-11 
RSX-PLUS III, UNICHANNEL device 
handlers, 4-16 



Save, context, Glossary-2 
Shutdown, spooler, 5-31 
Side 

call, Glossary-1 

interrupt, Glossary-3 
Size constraints, SPOOLER, 2-7 
Software directive task, 3-24 
Software directive task (SD) - B— 3 
Software interrupt, 3-21 
SPOLll, 1-1, 2-5 
Spooler, 5-1, 6-1 

assembling, 6-6 

begin directive, 5-5 

components, 5-2 

design, 5-2, 6-1 

shutdown, 5-31 

size constraints, 2-7 

startup, 5-5 

status report directive, 3-31 

UNICHANNEL- 15, 5-1 
Spooling, 1-1 
Spooling, LP, 5-26 
Starting addresses, ABSLll, 2-2 
Startup, spooler, 5-5 
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STOP task (ST), 3-24, B-2 

Structure, task, 3-5 

Switch, Busy/Idle, Glossary-1 

Switching, context, Glossary-2 

System crashes, 2-9 

System interrupt vectors, 3-16 



Table, 5-4 

central address, 6-5 

clock request (CLTABL) , 3-14 

device error status (DEVST) , 3-15 

DEVST, B-8 

internal, 3-16 

level, 3-15 

transfer vector (SENDll) , 3-16 

updating, 6-5 
Tape, absolute, 2-2 
Task 

card reader driver (CD) , B-7 

disk driver (RK) , B-3 

line printer driver (LP) , B-5 

plotter driver (XY) , B-9 
Task call service routines, 5-3 
Task code number, 3-7, 4-3, 

Glossary-5 
Task completion, 3-21 



UNICHANNEL-15, hardware system, 1-2 

1-3 
UNICHANNEL software reconfiguration, 

2-4 
UNICHANNEL-15 software system, 1-1, 

2-1 
UNICHANNEL-15 spooler, 5-1 
Unsupported tasks, 3-4 
Updating table, 6-5 
Utility routines, 5-3 



Write processor, 5-28 
.WRITE requests, 4-32 



Task control block, 1-4, 3-6 

TCBs, 3-6, 4-2 

pointer, 1-4 
Task directive 

connect, 3-27 

disconnect, 3-26 

software, 3-24 

software (SD) , B-3 
Task, PDP-11 requesting, 4-15 
Task, STOP, 3-24 
TASK, STOP (ST) , B-2 
Task structure, 3-5 
Task Request List (TRL) , 3-13 
Task starting address (TEVADD) , 3-16 
TCB, 5-5, 6-4 

TCB and issue request, 6-3 
TCB format, 6-4 

TCB - Task Control Block, Glossary-6 
TCBP - Task Control Block Pointer, 

GlossarY-6 
Temporary task installation, 4-4 
Testing, 4-41 
Timed wakeup, 4-41 

Transfer vector table (SENDll) , 3-16 
TRL listheads (LISTHD) , 3-14 



UC15 components, 2-10 

UNIBUS, 1-3, 1-4 

UNICHANNEL device handlers for 

RSX-PLUS III, 4-16 
UNICHANNEL-15 (UC15) , 1-1 
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HOW TO OBTAIN SOFTWARE INFORMATION 



SOFTWARE NEWSLETTERS, MAILING LIST 

The Software Communications Group, located at corporate headquarters in 
Maynard, publishes newsletters and Software Performance Summaries (SPS) 
for the various Digital products. Newsletters are published monthly, 
and contain announcements of new and revised software, programming 
notes, software problems and solutions, and documentation corrections. 
Software Performance Summaries are a collection of existing problems 
and solutions for a given software system, and are published periodi- 
cally. For information on the distribution of these documents and how 
to get on the software newsletter mailing list, write to: 

Software Communications 

P. 0. Box F 

Maynard, Massachusetts 017 54 

SOFTWARE PROBLEMS 

Questions or problems relating to Digital's software should be reported 
to a Software Support Specialist. A specialist is located in each 
Digital Sales Office in the United States. In Europe, software problem 
reporting centers are in the following cities. 

Reading, England Milan, Italy 

Paris, France Solna, Sweden 

The Hague, Holland Geneva, Switzerland 

Tel Aviv, Israel Munich, West Germany 

Software Problem Report (SPR) forms are available from the specialists 
or from the Software Distribution Centers cited below. 



PROGRAMS AND MANUALS 

Software and manuals should be ordered by title and order number. In 
the United States, send orders to the nearest distribution center. 

Digital Equipment Corporation Digital Equipment Corporation 

Software Distribution Center Software Distribution Center 

146 Main Street 1400 Terra Bella 

Maynard, Massachusetts 01754 Mountain View, California 94043 

Outside of the United States, orders should be directed to the nearest 
Digital Field Sales Office or representative. 

USERS SOCIETY 

DECUS, Digital Equipment Computer Users Society, maintains a user ex- 
change center for user-written programs and technical application in- 
formation. A catalog of existing programs is available. The society 
publishes a periodical, DECUSCOPE, and holds technical seminars in the 
United States, Canada, Europe, and Australia. For information on the 
society and membership application forms, write to: 

DECUS DECUS 

Digital Equipment Corporation Digital Equipment Corporation 
146 Main Street International (Europe) 

Maynard, Massachusetts 01754 P.O. Box 340 

1211 Geneva 26 

Switzerland 
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READER'S COMMENTS 



NOTE: This form is for document coirjnents only. ProblemiS 
with software should be reported on a Software 
Problem Report (SPR) form (see the HOW TO OBTAIN 
SOFTWARE INFORMATION page) . 



Did you find errors in this mianual? If so, specify by page. 



Did you find this manual understandable, usable, and well-organized? 
Please make suggestions for improvement. 



Is there sufficient documentation on associated system program.s 
required for use of the software described in this manual? If not, 
what miaterial is missing and where should it be placed? 



Please indicate the type of user/reader that you most nearly represent. 

I I Assembly language programmer 

I I Higher-level language programmer 

I I Occasional programmer (experienced) 

I I User with little programming experience 

I I Student programmier 

I 1 Non-programmer interested in computer concepts and capabilities 

Name Date 

Organization 

Street — 

City_____ State Zip Code 

or 
Country 

If you do not require a written reply, please check here. Q 
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